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Wetten, daß...? 


Wettspiele unterliegen den Geset- 
zen der Wahrscheinlichkeits- 
rechnung, doch beschäftigt 

sich kaum ein Spieler syste- 
matisch damit. Es ist aber durch- 
aus lohnend, sich einmal in die 
Lage des Buchmachers zu verset- 
zen und zu „computern“. 


B: jedem Glücksspiel lassen sich di 
cen durch Wahrscheinlichkeitsr 
abschätzen. Die gesamte Wah 
lichkeitsrechnung ist ein Feld voller Fallg 
und scheinbarer Widersprüche. Schon die Ab- 
sicht, den Zufall präzise beschreiben zu wollen, 
wirkt zunächst absurd. Der Spieler von heute 
hat aber in seinem Computer einen fähigen 
Partner zum Berechnen der Chancen und kann 
damit bei einer gewissen Selbstbeherrschung 
sehr weitkommen, wenn erein paar mathemati- 
sche Grundlagen kennt. Dieser Artikel erläutert 
die erforderlichen Voraussetzungen und zeigt 
einige Punkte anhand eines Programmbei- 
spiels auf. 

Als erstes sollte sich der informierte Spieler 
über den Zusammenhang zwischen Chancen 
und Wahrscheinlichkeiten im klaren sein. Beim 
Wetten kann entweder für oder gegen das Ein- 
treffen eines bestimmten Ereignisses gesetzt 
werden. Die Buchmacher notieren im allgemei- 
nen Einsätze „dagegen“, etwa gegen den Renn- 
sieg eines Pferdes, wenn es nicht ausdrücklich 
„Odds on“ (dafür) heißt. Die Übersichtlichkeit 
wird dadurch erschwert, daß die Gewinnchan- 
cen durch Zahlenverhältnisse wie „6:4" angege- 
ben werden, wo 3:2 eigentlich durchaus logi- 
scher erschiene. 

Zur Vereinfachung ist es daher zweckmäßig, 
das Chancenverhältnis einheitlich durch eine 
einzige Zahl auszudrücken. Hierzu lassen sich 
die beiden untenstehenden Formeln verwen- 
den, wobei „f" die Chancen für das Ereignis, „a“ 
die abschlägigen Chancen bedeuten, die der 
Buchmacher notiert, und „F“ bzw. „A“ die zuge- 
hörigen Chancenverhältnisse angeben: 

F=f/a,;,A=a/f 
Wenn die Chancen gegen ein Ereignis 100:30 
stehen, ist a=100 und f=30. Das Chancenver- 
hältnis für das Ereignis ist dann F=30/ 100=0,30 
und das Verhältnis dagegen A=100/ 30=3,33. 
Die Chancen 7:2 wären dasselbe wie 35:1, und 
1l:4 entspräche 2,751 — die einheitliche An- 
gabe erleichtert den Überblick. 

Der nächste Schritt besteht in der Umsetzung 
der Chancen in Wahrscheinlichkeiten, und 
zwar mit Hilfe der Formeln 


Wahrscheinlichkeits- 
rechnung 


Die mathematische Wahrschein- 
lichkeitsanalyse kam durch eine Pechsträhne 
beim Spielen in Gang. Ein gewisser Cheva- 
lier de Mere hatte sich im 17. Jahrhundert die 
Taschen gefüllt, indem er immer wieder wet- 
tete, er schaffe bei viermaligem Würfeln min- 
destens eine Sechs. 

Leider führte der Erfolg des Chevalier 
dazu, daß kein Mensch mehr gegen ihn set- 
zen wollte. Deshalb behauptete er nun, er 
würde bei 24 Versuchen mit einem Würfel- 
paar mindestens eine doppelte Sechs werfen. 

Das einzig bekannte Verfahren zur Ermitt- 
lung der Wahrscheinlichkeiten bestand da- 
mals darin, so oft wie möglich zu würfeln und 
die Ergebnisse zu protokollieren; eine zeit- 
raubende und unzuverlässige Methode. Des- 
halb schrieb der Chevalier kurz vor dem 
Bankrott an den Mathematiker Pascal. 

Die Chancen bei der ersten Wette stan- 
den mit knapp 14:13 günstig für de Mere. Bei 
der zweiten Wette ergibt sich jedoch ein 
Chancenverhältnis von rund 28:29, ein 
Zuschußgeschäft! 


1765 


rs Computer Welt 


1766 


P=F/ (F+1) oder P= 1/(A+]) 
P gibt die Wahrscheinlichkeit eines Ereignis- 
ses an, beidem die Chancen F:] für das Eintref- 
fen oder A:l dagegen stehen. Aus 100:30 oder 
3,33:1 wird so die Wahrscheinlichkeit P= 1/4,33 
— 0,231. P ist dabei immer die Wahrschein- 
lichkeit für das Eintreten des Ereignisses, z. B. 
für den Sieg eines bestimmten Rennpferds. Die 
Wahrscheinlichkeit Q für das Ausbleiben des 
Ereignisses ergibt sich einfach aus der Formel 

Q=1-P 
Es gilt also stets P+Q=1, weil die Wahrschein- 
lichkeiten für das Eintreten und das Ausbleiben 
desselben Ereignisses zusammen immer | er- 
geben müssen. 

Der Buchmacher offeriert niedrigere Ge- 
winnchancen, als es den realen Chancen ent- 
spricht, anders ausgedrückt: Er läßt die Ereig- 
nisse, gegen die gesetzt wird, wahrscheinlicher 
aussehen, als sie tatsächlich sind. Die Gründe 
dafür liegen auf der Hand — der Buchmacher 
muß schließlich auch seine Kosten und seinen 


Chancen und 
Wahrscheinlichkeit 


Die Umrechnung von Chancen in Wahrschein- 
lichkeiten sei anhand eines Wettscheins mit 
vorgegebenen Gewinnchancen illustriert, wie 
erin England bei der Fußballwette üblich ist. 
Für das Spiel Leicester gegen Everton sind 
folgende Quoten notiert: 


15/8 Leicester 5/2 Everton 1/1 


Dies bedeutet, daß die Chancen gegen einen 
(Heim-)Sieg von Leicester 15:8 stehen, die 
Chancen gegen ein Unentschieden 5:2 und die 
Chancen gegen einen (Auswärts-)Sieg von 
Everton 1:1. Übrigens fand dies Spiel im Som- 
mer 1985 tatsächlich statt, wobei Everton zwar 
zunächst in Führung ging, dann aber doch 
einen 3:1-Erfolg der Platzherren hinnehmen 
mußte. Zunächst sind die Chancen nach der 
Formel A = a/f zu normieren: 


Heimsieg 15/8 = 1,878 
Unentschieden 5/2 = 2500 
Auswärtssieg 1721 — 1.000 


Daraus folgen die Wahrscheinlichkeiten 
P=1/(A+D): 


Heimsieg 1/2875 = 0.3478 
Unentschieden 1/3.5 = 0,2857 
Auswärtssieg 1/2 = 0,5000 
Summe = 1,1335 


Lebensunterhalt hereinholen. Zur Erläuterung 
ein fiktives Pferderennen: 


Rennpferd Gesetzt Chancen Auszahlg. 

Flinker Schneider DM 4000 5:6 DM 7333 

Atari Sayonara 3000 13:8 17875 

Acorn Junior 80 8:1 7200 

Roter Apple 200 33:1 6800 
8000 


Hier sind insgesamt 8000 Mark gesetzt, die 
Hälfte auf den „Flinken Schneider", der Rest 
wie angegeben. Die Gewinnchancen sind so 
gewählt, daß die Verbindlichkeiten des Buch- 
machers stets unter dem Gesamteinsatz blei- 
ben, egal wer das Rennen macht. Heißt der Sie- 
ger „Acorn Junior“, bekommen seine Anhänger 
ihren Einsatz von 800 Mark und dazu das Acht- 
fache davon ausgezahlt, also 7200 Mark. Dabei 
bleiben als Profit 800 Mark oder 10 % des Ein- 
satzes für den Buchmacher. In einem ausge- 
glichenen Wettbuch müßten „Schneider“ mit 1:1 
und „Acorn“ mit 91 notiert sein — aber wer 
wollte damit noch Buchmacher spielen? 


Daß hier die Summe der Wahrscheinlichkeiten 
mit 1.1335 größer als 1 wird, ist zwar mathema- 
tisch, nicht aber juristisch bedenklich. Es be- 
deutet lediglich, daß der Buchmacher die 
Wahrscheinlichkeitssumme 1 bei diesem Spiel 
um 13.35 % überzogen hat. Wenn Sie sich ver- 
gegenwärtigen, daß höhere Wahrschein- 
lichkeiten (dafür) kleineren Chancen (dage- 
gen) entsprechen, ist das für ihn ein einträg- 
liches Geschäft. 
Um Ihnen Schreib- (und Denk-)arbeit zu 
ersparen, ist unten ein Programm aufgelistet, 
das die Rechnerei einschließlich der Ermitt- 
lung der Buchmacher-Prozente übernimmt. 
10 REM KAKKKKKKKKHHK KT I I GT FI ZT ZH A NH HH FH a a a a a a a a 
20 REM **WAHRSCHEINLICHKEITSBERECHNUNGEN* * 
30 REM KAKKKAKKKKAHHKHK KH TH TH TH TH TH HH KH HH A HH a a a a a 
100 PRINT'"Wahrscheinlichkeitsrechner" 

110 PRINT "Chancen als Zahlenpaar angeben;" 
120 PRINT "etwa 3,1 fuer 3:1 usw." 

130 PRINT "Beendigung der Eingabe mit 0,0"' 
140 at%=&0102040A : REM Format 

150 N=0 . 

160 TP=0 : TA=0 

190 REM **Hauptschleife** 

200 REPEAT 

202 38=4 

210 N=N+1 

220 PRINT "Rennpferd ";N;" heißt "; 

222 INPUT NAME$ 

225 PRINT "Chancen dagegen "; 

230 INPUT A,F 

240 IF A<=0 AND F«<=0 THEN GOTO 310 

250 P = F/(F+A) 

260 A = A/F 

270 TP=TP+P : REM *Wahrsch.-Summe 

280 TA=-TA+tA : REM *Chancen-Summe 


290 PRINT "Fuer Pferd Nr. ";N;", ";NAME$ 
295 D=-at% 
296 PRINT "ist die Wahrsch.: ";P 


300 PRINT 

310 UNTIL A<=0 OR F<=0 

320 N=N-1 

322 3=at% 

330 PRINT 

333 PRINT "Einsatz-Auszahlung: ";100/TP;"%" 

335 PRINT "Buchmacheraufschlag:";100* (TP-1); 
non 

360 IF TP<1 THEN PRINT "Sie scherzen wohl!"; 
CHR$7 

999 END 
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Bei unserer fiktiven Wette ist zumindest 
eins lebensecht: Den Außenseitern werden re- 
lativ schlechte Chancen eingeräumt. Deshalb 
steht sich der Buchmacher meist günstiger, 
wenn mal ein Schuß ins Blaue trifft; setzen Sie 
also nicht auf unbeschriebene Blätter! Sie sub- 
ventionieren damit nur die Favoriten, weil die 
Buchmacher dort nicht wesentlich unter glei- 
chen Einsatz gehen können, ohne die Bieter zu 
vergrämen. 

Dann und wann schafft es ein Buchmacher 
nicht, seine Verbindlichkeiten abzudecken 
weil er entweder zu langsam auf plötzliche Um- 
schwünge im Wettverhalten reagiert oder mit 
unrealistischen Einsätzen eröffnet hat. Aber das 
sind Ausnahmen; schließen Sie daraus bloß 
nicht, Sie könnten die Buchmacher aufs Kreuz 
legen. Sie können allenfalls Ihren Mitspielern 
das Geld aus der Tasche ziehen, wobei der 
Buchmacher als Mittelsmann fungiert und da- 
bei seinen Schnitt macht. Der Traum vom leich- 
ten Geld bleibt trotz Computer ein Traum. 


wahrscheinlichkeitsrechner 
Chancen als Zahlenpaar angeben; 
etwa 3,1 fuer 3:1 usw. 
Beendigung der Eingabe mit 0,0 


Rennpferd 1 heißt ?Heimsieg 
Chancen dagegen ?15,8 

Fuer Pferd Nr.1, Heimsieg 
ist die Wahrsch. : 0.3478 


Rennpferd 2 heißt ?Unentsch. 
Chancen dagegen ?5,2 

Fuer Pferd Nr.2, Unentsch. 
ist die Wahrsch. : 0.2857 


Rennpferd 3 heißt ?Auswaerts. 
Chancen dagegen ?1,1 

Fuer Pferd Nr.3, Auswaerts. 
ist die Wahrsch. 0.5000 


Rennpferd 3 heißt ? 
Chancen dagegen ?0,0 


Einsatz-Auszahlung: 88.2192% 
Buchmacheraufschlag:13.3540% 
> 

> 

>RUN 


Wahrscheinlichkeitsrechner 
Chancen als Zahlenpaar angeben; 
etwa 3,1 fuer, 3:1 usw. 
Beendigung der Eingabe mit 0,0 


Rennpferd 1 heißt ?Slip Anchor 
Chancen dagegen ?9,4 

Fuer Pferd Nr. 1, Slip Anchor 
ist die Wahrsch. 023047 


Rennpferd 2 heißt ?Law Society 
Chancen dagegen ?5,1 

Fuer Pferd Nr. 2, Law Society 
ist die Wahrsch. 0.1667 


Rennpferd 3 heißt ?Damister 
Chancen dagegen ?16,1 

Fuer Pferd Nr. 3, Damister 
ist die Wahrsch. : 0.0588 


Rennpferd 3 heißt ?Supreme Leader 
Chancen dagegen ?10,1 

Fuer Pferd Nr. 4, Supreme Leader 
ist die Wahrsch. 0.0909 
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Rennpferd 5 heißt ?Lanfranco 
Chancen dagegen ?14,1 

Fuer Pferd Nr. 5, Lanfranco 
ist die Wahrsch. :0.0667 


Rennpferd 6 heißt ?Reach 
Chancen dagegen ?33,1 
Fuer Pferd Nr. 6, Reach 
ist die Wahrsch. :0.0294 


7 heißt ?Theatrical 
210,1 
Theatrical 
:0.0909 


Rennpferd 
Chancen dagegen 
Fuer Pferd Nr. 7, 
ist die Wahrsc 


Rennpferd 8 heißt ?Phardante 
Chancen dagegen ?40,1 

Fuer Pferd Nr. 8, Phardante 
ist die Wahrsch. :0.0244 


Rennpferd 9 heißt ?Royal Harm 
Chancen dagegen ?40,1 

Fuer Pferd Nr. 9, Royal Harm 
ist die Wahrsch. :0.0244 


Rennpferd 10 heißt ?Snow Plant 
Chancen dagegen ?100,1 


Fuer Pferd Nr.10, Snow Plant 
ist die Wahrsch. :0.0099 
Rennpferd 11 heißt ?Petowski 
Chancen dagegen ?33,1 

Fuer Pferd Nr.11, Petowski 
ist die Wahrsch. :0.0294 
Rennpferd 12 heißt ?Seurat 
Chancen dagegen ?33,1 

Fuer Pferd Nr.12, Seurat 

ist die Wahrsch. :0.0294 


Rennpferd 13 heißt ?Shadeed 
Chancen dagegen ?7,2 

Fuer Pferd Nr.13, Shadeed 
ist die Wahrsch. :0.2222 


Rennpferd 14 heißt ?Main Reason 
Chancen dagegen ?200,1 

Fuer Pferd Nr.14, Main Reason 
ist die Wahrsch. :0.0050 


Rennpferd 15 heißt ? 
Chancen dagegen ?0,0 


Einsatz-Auszahlung: 86.5215% 
Buchmacheraufschlag:15.5781% 
> 
3 


SEELEN: 


Für das Ausfüllen von 
Totozetteln sind diverse 
Verfahren in Gebrauch. 
In England ist der „8 
aus 10“-Tip am popu- 
lärsten; dabei kreuzt je- 
der Teilnehmer zehn 
Spiele an. Wenn die Er- 
gebnisse bekannt sind, 
werden die acht besten 
Tips ausgewertet, um 
die höchstmögliche 
Punktzahl zu erreichen. 
Die Auswahl der Spiele 
erfolgt nach den ver- 
schiedensten Metho- 
den, wobei immer nur 
eine verschwindende 
Chance besteht, acht- 
mal Unentschieden zu 
ziehen. 
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Objekt- 
Listing 


In der letzten Folge haben wir die 
drei für Objekt-Manipulation er- 
forderlichen Strukturen unter- 
sucht. Hier zeigen wir die ent- 
sprechenden Listings und nehmen 
einige Veränderungen vor, um 
„Dog and Bucket“ noch lebendi- 
ger zu machen. 


nser Objekt-Manipulationsbaum kann 

durch Hinzufügen verschiedener Zeilen 
zum Quell-Listing (S. 1731) programmiert wer- 
den. Die Schlüsselzeilen sind 210, 220, 2430, 
2440, 5030 bis 5090. Betrachten wir diese Teile 
genauer. 

Die Zeilen 210 bis 220 setzen die für die Spei- 
cherung der Daten unseres Baumes erforder- 
lichen Arrays. Dabei ist zu berücksichtigen, daß 
dieser Baum im Gegensatz zu vorher untersuch- 
ten Bäumen viele unterschiedliche Zustände 
überprüft, unabhängig von der Verzweigungs- 
tiefe oder Knotenzahl. Deshalb ist für jeden 
Knoten eine Aufzeichnung des Zustandswertes 
sowie der weiterführenden Wege erforderlich, 
abhängig davon, ob die entsprechende Bedin- 
gung richtig oder falsch ist. Das c-Array enthält 
die verschiedenen Zustandswerte. Jeder Kno- 
ten überprüft ein Element des Arrays. Die Zahl 
der zu überprüfenden Elemente wird in das 
k-Array gelesen. 

Die Zeilen 2430 und 2440 initialisieren das 
c-Array. Diese Zeilen bilden eine Subroutine, 
die für jeden „Darsteller“ aufgerufen werden 
muß, da der Zustandswert bei jeder Person 
zwangsläufig anders ist. 

Zeile 5040 prüft die derzeitige Knotennum- 
mer. Handelt es sich um einen Endknoten (d.h. 
wenn die Zahl über 21 liegt), wird zu der Routine 
in den Zeilen 5070 bis 5090 verzweigt. Zeile 5050 
prüft, ob der Knoten sich im Testzustand 12 be- 
findet. Ist das der Fall, wird die Zufallszahl-Rou- 
tine aufgerufen, um dem Zustand einen Wert 
(entweder eins oder zwei) zuzuordnen. Zeile 
5060 führt daraufhin den wichtigsten Teil der 
Operation aus: Sie wählt aus dem t-Array die 
neue Knotenzahl. 

Läßt man das vollständige Programm laufen, 
sieht man, wie das Figurenmodul funktioniert. 
Nach dem Prompt „Default values?“ ist Y einzu- 
geben. Der Figuren-Editor in Zeile 2350 ist mit 
dem Figurenmodul in der vorhandenen Form 
nicht voll kompatibel. 
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Folgende Zeilen müssen dem Initialisierungs-Modul 
hinzugefügt werden. Mit Zeile 190 wird ein Array t 
gesetzt, das zur Datenspeicherung für unsere drei 
Haupt-Baum-Strukturen benutzt wird. Das Array k 
enthält die unterschiedlichen Zustände, die in den 
verschiedenen Knoten überprüft werden müssen. Im 
Array c sind die Zustandswerte enthalten. 


138 
148 
158 
168 
188 
198 
208 
218 
228 


setup trees 


object tree 
FOR 


Um den ersten Teil un- 
seres Figurenmoduls 
einbeziehen zu können, 
müssen wir unsere 
Hauptprogramm- 
Schleife verändern. Mit 
den Zeilen 550 bis 800 
wird nacheinander je- 
der „Darsteller“ über- 
prüft, um festzustellen, 
ob das Handlungs-Flag 
größer als Null ist 
(Zeile 560). Ist das der 
Fall, nimmt der Wert um 
eins ab, und die näch- 
ste Figur wird über- 
prüft. Beträgt der Wert 
Null, wird der Steu- 
erungsfaktor (c$(n,10)) 
durch Lesen der Daten 
in den Zeilen 6030 und 
6040 zurückgesetzt. 
Zeile 580 prüft, ob der 
Standardwert Null be- 
trägt. In diesem Fall be- 
arbeitet das Modul den 
Darsteller nicht. Zeile 
590 initialisiert die 
„Baumzustände“ durch 
Aufruf der Subroutine 
in Zeile 2430. 


Die Zeilen 2430 und 
2440 ordnen dem c-Ar- 
ray verschiedene Zu- 
standswerte zu. Das Fi- 
gurenmodul ruft die 
Subroutinen in den Zei- 
len 2520, 2620 und 2720 
an verschiedenen Punk- 
ten auf. 


FNb(y,z)=VAL(b$(y,z)) 
FNc(y,zI=VAL(c$(y,z)) 
FNm$(c$ ,dI)=STR$C(VAL(c$)) -d) 
FNi$=b$(VAL(c$(c,39),D 


t(3,25,2) ,K(3,38) ‚c(25) 


n=1 TO 21: REM 21 choice nodes 
READ KC1,n) ‚tC1,n,2d ,t&1,n,1): NEXT n 


588 REM 


2 
* 


518 REM test program loop 


328 REM 


22 
2510-2600 
3 IE 


7 


an" 


E 


2 


u“ 


538 GOSUB 2188: GOSUB 2158: GOSUB 2248: 


PRINT: PRINT 


548 REM character handler 


358 FOR c=1 TO & 


968 IF FNc(c,183>8 THEN c$(c, 18)=FNm$(c$ 


(c,18),1): GOTO 888 


378 RESTORE: FOR n=1 TO cX18+c-1: READ c 
$%(c,1@): NEXT n: REM reset default handl 


e value 


388 IF FNc(c,18)=8 THEN GOTO 888 
578 GOSUB 2438: GOSUB 5888: REM call obj 


ect tree 
888 NEXT c 


818 GOSUB 4268: IF i$="" GOTO 558 
828 GOSUB 2848: GOTO 538 


2400 REM 
2410 REM conditions 


2420 REM 


2430 h=FNc(c,8): i=FNc(c,3): j=FNc(c,6): 
ct1)=ABSCI)0): cC2I=ABSC(FNbCj,2I=FNc(c 
„2I) AND (q=1)): c(H=ABSChb$(i ,3)="y"): 
ct4)=ABSCFNC(c,3)=FNc(c,6)): c(5)=ABS(b$ 


(i,4)="y") 


2440 c(s)=ABSCI=3): c(7I=ABSCFNc(c,5))5) 
3 c(8I=ABSCFNC(c,5))2): c(9)=ABS(VAL(c$( 
c,d=1): cl10)=SABSCFNC(x,3)=0): c(11)=A 
BSCFNc(h,2)=FNc(c,2)): c(12)=255 


2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2570 
2600 
2610 
2620 


RETURN 
REM 


REM 
FOR b=1 TO 12 
NEXT b 


n=39 


IF f=1 THEN n=3: G0TO 2600 


REM check location for objects 
f=0: REM set ‘found flag’ to zero 


IF FNbtb,2)=FNc(c,2) THEN #=1: b=12 


REM check for presence of owner of 


object: if present, set x to character n 
umber: jump back into tree 


2630 REM 
2640 #=0:x=0 
2650 FOR m=i TO 6 


Verzweigungslinien 

Hier wird der Objekt-Manipu- 
lationsbaum dargestellt, wobei 
die Wahlknoten blau, die End- 
knoten rot sind. Die Knoten 22 
und 23 verzweigen zu Subrou- 
tinen, die die neue Knoten- 
nummer festlegen. Jeder 
Wahlknoten zeigt zudem (in 
grün) den Wert des c-Array- 
Elements, das den Wert des 
zu prüfenden Zustands enthält 
(Zeilen 2430 und 2440). Zufalls- 
knoten sind durchweg dem 
Element 12 zugeordnet. Die 
Endknoten sind mit der Zei- 
lennummer der Subroutine 
versehen, an die die Steue- 
rung übergeben wird. 


Hier fügen wir eine Zu- 
fallszahl-Routine ein für 
die verschiedenen Zu- 
falls-Wahl-Knoten, fer- 
ner eine kurze Routine, 
um die Codes von 
c$(n,8) und c$(n,9) auf 
Null zu setzen. 


Diese Zeilen laufen 
durch den Baum (5030 
bis 5060) und wählen 
die verschiedenen Sub- 
routinen, die durch die 
Endknoten (Zeile 5090) 
bestimmt werden. Zu 
beachten ist Zeile 5080, 
mit der zwei Subrouti- 
nen gewählt werden, 
die neue Knotenwerte 
erzeugen und dann 
wieder zum Entschei- 
dungsbaum zurück- 
springen. 


2660 IF <FNc(m,2)=FNc(c,2)) AND (FNc(m,6 
I)=FNc(c,3)) THEN f=1: x=m: GOSUB 2430: m 


2670 NEXT m 

IF #=1 THEN n=15: 60T0 2700 

2690 n=39 

RETURN 

REM 

2720 REM select object at random from ch 
aracter’s location 

2730 
2740 b=0 

2750 FOR s=1 TO 12 

2760 IF FNb(s,2)<>FNc(c,2) THEN GOTO 278 
0 

2770 GOSUB 4180: IF q=1 THEN b=s: s=12 
2780 NEXT s 


2790 IF b=0 THEN GOTO 2750 
2800 RETURN 

4158 REM 

4168 REM random number routine 
4170 REM 

4188 qFINT(RND( 1) %2) +1: RETURN 
4198 REM 

4286 REM zero character codes 
4218 REM 

4228 c$(c,8="8": c$(c,P)="8": RETURN 
4238 REM 


4248 REM test to see if key pressed 
4258 REM 
4268 i$=INKEY$: RETURN 


5000 
5010 
5020 
5030 


REM object tree routines 

p=0: REM zero print flag 

IF FNc(c,2)=r THEN p=1 

n=1: REM start at node 1 

5040 IF n)21 GOTO 5070 

5050 K=c(K(i,n))+i1: IF K(i,n)=12 THEN GO 
SUB 4180: kK=q 

5040 n=t(i1,n,k): GOTO 5040 

5070 IF n)=24 GOTO 5090 

5080 ON (n-21) GOSUB 2540,2640: GOTO 504 
0 

5090 ON (n-23) GOTO 5100,5130,5160,5180, 
5210 ,5240 ,5240 ‚5270 ,5280 ,5300 ,5310,5330, 
5340 ,5340 ‚5370 ,5430 

5100 GOSUB 2740: c$(c,3)=STR$(b) 


5110 IF p=1 THEN PRINT c$(c,1);" picks u 
p";b$(b,1): PRINT - 
5120 b$(b,2)="0": c$(c,9)="4': 
5130 c$(c,3)=c$(c,6) 

5140 IF p=1 THEN PRINT c$(c,1);" picks u 
p";FNi$: PRINT 

5150 b$(WAL(c$(c,3)),2)="0": c$(c,9)="4" 
: RETURN 

5150 IF p=1 THEN PRINT c$(c,1);" takes a 
sip from";FNi$: PRINT 

5170 c$(c ,4)=Fim$(c$(c,4),-1): RETURN 
5180 GOSUB 4180: IF (p=1) AND (q=1) THEN 
PRINT c$(c,1);" is eating the sandwich. 
": PRINT 

5190 c$(c ,4)=FNm$(c$(c,4),-2): c$(c,9)=" 
6": GOSUB 4180: IF q=i1 THEN G0OSUB 4220 
5200 RETURN 

5210 IF p=1 THEN PRINT c$(c,1);" takes a 
tentative bite of the pasty, groans, an 
d drops it on the #loor.": PRINT 

3220 g=c: REM set pasty eaten flag 


RETURN 


| 


5230 c$(c,3)="0": c$(c,4)=FNm$(c$(c,4),1 


0): b$(3,2)=c$(c,2): RETURN 

5240 IF p=1 THEN PRINT c$(c,1);" puts do 
wn";FNi$: PRINT 

5250 b$(WAL(c$(c,3)) ,2)=c$(c,2): c$(c,3) 
="0": RETURN 

5260 c$(c,5)=FNm$(c$(c,5),-1): RETURN 
5270 GOSUB 5240: RETURN 

5280 IF p=1 THEN PRINT c$(c,1);" throws" 
sbs(WAL(c$(c,3)),1);5" at "5c$(x,1): PRIN 


T 
3290 c$(x,4)=FNm$(c$(x,4),1): b$CVAL(cH 
c,3)),2=c$(c,2): c$(x,8)=STR$(c): c$(x, 
9)="5": c$(c,3)="0": RETURN 

5300 GOSUB 4220: RETURN 

5310 IF p=1 THEN PRINT "I think I’ve got 
your drink, says ";c$(c,1);" to ";c$(x, 
1): PRINT 

5320 c$(c,8)=STR$(x): c$(c,9)="2": RETUR 
N 

5330 c$(c ,4)=FNm$(c$(c,4),2): RETURN 
5340 IF p=1 THEN PRINT c$(c,1);" gives"; 
FNi$;" to ";c$(x,1): PRINT 

5350 c$(x,3)=c$(c,3): c$(c,3)="0": c$(x, 
8)=STR$(c): c$(x,9)="1": RETURN 

5350 GOSUB 4220: RETURN 

5370 IF p=0 G0TO 5420: 

5380 IF p=1 THEN PRINT c$(c,1);" is drun 
kenly thanking ";c$(VWAL(c$(c,8)),1);" #o 
r returning "; 

5370 IF p=1 AND c$(c,7)="f" THEN PRINT " 
her ";: GOTO 5410 

5400 PRINT "his "; 

5410 PRINT "drink": PRINT 

5420 GOSUB 4220: RETURN 

5430 RETURN 

Durch Zeile 220 sind die Werte in Dreiergruppen 
eingebracht, die für jeden Knoten folgende Zuord- 
nung treffen: Definition des c-Array-Elements, das 
die zu testende Kondition enthält; die Nummer des 
zu verzweigenden Knotens, wenn der Zustand wahr 
ist; der Knoten, zu dem zu springen ist, wenn der 
Zustand falsch ist. 


6288 REM 

4218 REM object tree data 

4228 REM r 

6238 DATA 1,2,22,12,5,4,2,7,6,3,9,8,4, 11 
‚10,12,39,24,12,6,25,5,12,39,6,13,27,12, 
23,29,12,38,14,12,26,39,12,28,39,12,31,1 
7,7,18,16,8,39,19,9,21,39,18,36,28, 12,33 
‚32,12,35,34,11,38,37 


N 


1769 


1770 


> 4 


Kooperation 


In dieser Folge untersuchen wir, wie BASIC mit dem Betriebssystem 
des Acorn B zusammenarbeitet, und stellen USR und CALL vor. 


s wurde bereits erwähnt, daß viele OS-Rou- 

tinen auch vom BASIC eingesetzt werden. 
So ruft der BASIC-Befehl SOUND für die Toner- 
zeugung OSWORD mit A=7 auf, während EN- 
VELOPE OSWORD mit A=8 auf die gleiche 
Weise verwendet. Die BASIC-Abläufe lassen 
sich bis zu einem gewissen Grad beeinflussen, 
wenn man das Betriebssystem ändert — das 
heißt durch Vektorveränderungen und durch ei- 
genen Code, der anstelle der bereits bespro- 
chenen OS-Routinen abläuft. 

OSWRCH, OSASCI und OSNEWL werden 
von einer Reihe Bildschirmsteuerroutinen ein- 
gesetzt. Oftistjedoch Maschinencode, der Gra- 
fik mit OS-Routinen erzeugt, nicht wesentlich 
schneller als die entsprechenden BASIC-Be- 
fehle. Daran läßt sich messen, auf welche 
Weise der BASIC-Interpreter OS-Routinen bei 
Befehlen wie MOVE, DRAW und PLOT einsetzt. 

Sehen wir uns die beiden BASIC-Befehle ein- 
mal an, mit denen Sie von BASIC aus OS-Routi- 
nen aufrufen können: USR und CALL. 

USR führt eine Maschinencoderoutine aus 
und kehrt dann mit einem Wert ins BASIC zu- 
rück, der Aufschluß über die Register A, X und 
Y, den Status des Übertragsflag und des Prozes- 
sor Status Registers (PRS) gibt. Der Befehl hat 
folgendes Format: 


Ergebnis%=USR(Adresse%) 


Adresse% ist die Speicheradresse der auszu- 
führenden Routine. Bevor der Befehl eingesetzt 
wird, kann man Werte an A%, X% und Y% über- 
geben, die von der USR-Routine in die Register 
A, X und Y gestellt werden. Mit dem niederwer- 
tigsten Bit von C% läßt sich außerdem das Über- 
tragsflag beeinflussen — ein gerader Wert von 
C% setzt es auf Null. 

Das folgende Programmbeispiel zeigt den 
Einsatz von USR. Dabei wird eine Routine von 
OSBYTE aufgerufen, die im X-Register die 
X-Koordinate des Cursors ablegt und im Y-Re- 
gister die Y-Koordinate. Der Wert von Ergeb- 
nis% zeigt diese Registerinhalte in einer codier- 
ten Form, auf die wir später noch genauer bei 
unserer ausführlichen Betrachtung des Be- 
triebssystems des Acorn B eingehen. 


10 A%=134 

20 X%=0 

30 Y%=0 

40 LET Ergebnis%=USR(&FFFA4) 

50 PRINT Ergebnis%: REM zeigt eine Hexzahl 


Die ermittelten Werte lassen sich leichter deco- 
dieren, wenn das Ergebnis im Hexadezimalfor- 
mat angezeigt wird. 


USR in Aktion 


Mit USR läßt sich von BASIC aus ein Maschi- 
nencodeprogramm aufrufen, das einen Wert 
an BASIC zurückgibt. Da USR eine Funktion 
ist (im Gegensatz zu dem „Befehl“ CALL), 
muß der zurückgegebene Ergebniswert ent- 
weder einer Variablen zugeordnet werden 


Ergebnis=USR(&FFFA4) 

oder Teil eines PRINT-Befehls sein: 

PRINT USR(&FFFA) 

Der von USR an BASIC gelieferte Ergebnis- 


wert ist eine Ganzzahl mit der Länge von vier 
Bytes, die den Inhalt der Register P, X, Y und 


A folgendermaßen speichert: 


Ergebnis%= 


Prozessor |Y-Register | X-Register 


Höchstwertiges Byte Niederwertiges Byte 


Sie erhalten den Wert eines bestimmten Re- 
gisters, indem Sie mit AND Teile des Ergeb- 
nisses maskieren. 

Ergebnis% AND&000000FF 


maskiert alle Werte außer Register A. 


Maschinencodeprogramme lassen sich auch 
mit CALL aufrufen. Wir haben diesen Befehl 
schon mehrere Male verwandt — speziell für 
den Aufruf von OSWORD und anderen OS-Rou- 
tinen. Die gewünschte Routine wird über ihre 
Adresse aufgerufen. Hier ein Beispiel: 


CALL &FFF1 


Das BASIC des Acorn B enthält eine erweiterte 
Version dieses Befehls, die dem Maschinenco- 
deprogramm Werte von BASIC-Variablen über- 
geben kann. Dabei stellt sich die Frage, wie 
dem Maschinencodeprogramm mitgeteilt wer- 
den soll, an welcher Stelle des Speichers sich 
die Variablen befinden. Der BASIC-Interpreter 
löst das Problem, indem er bei einem CALL mit 
Parametern wie: 


CALL Adresse%,A%,C% 


alle Informationen über A% und C% in einem Be- 
reich der Speicherseite 6 ablegt, der „Parame- 
terblock“ genannt wird. Die Tabelle zeigt den 
Aufbau des Blocks: 


| Stelle | Inhaltsbeschreibung | 
&0600 | Anzahl der Parameter 


&0601 Adresse des ersten Parameters 
&0602 : 


&0603 | Typ des ersten Parameters n 


&0604 Adresse des zweiten Parameters 
&0605 
30606 


Selbstverständlich kann der Block beliebig 
viele Einträge für Adressen und Typen enthal- 
ten. Der Adreßparameter ist einfach beschrie- 
ben: An dieser Speicherstelle befindet sich das 
erste Byte des Parameters. Der Typparameter 
zeigt an, welche Art Variable der Parameter ist. 
Hier alle verfügbaren Typen: 


8-Bit-Byte CALL Adresse, ?&70 
Ganzzahlvariable | CALL Adresse, F% 
Reelle-Variable CALL Adresse, G 
String bei Adresse | CALL Adresse, $(&A00) 
String-Variable | CALL Adresse, F$ 


Der letzte Eintrag — Typ 129 — fällt aus dem 
Rahmen heraus. Hier zeigt der Adreßeintrag 
des Parameterblocks nicht auf die Position des 
Strings im Speicher, sondern auf einen Bereich, 
der weitere Informationen über den String lie- 
fert — den „String Information Block“. Er hat fol- 


gendes Format: 
| Stele | Inhaltsbeschreibung 
Adresse 


Im Parameterblock 
gespeicherte Adresse 
des String 


Ra  zugeteilte Bytes 
BEE , 127 

Die ersten zwei Bytes des Information Blocks 
zeigen auf das erste Zeichen des Strings, und 
der Eintrag für „zugeteilte Bytes" gibt die maxi- 
male Länge an, die dem String zugeteilt wurde. 
Byte 4 enthält seine aktuelle Länge. 

Mit CALL kann vom BASIC aus ein Maschi- 
nencodemodul ausgeführt werden, das im Ge- 
gensatz zu USR allerdings keinen Wert zurück- 


gibt. Sie können jedoch eine Subroutine schrei- 
ben, die die Ergebniswerte des Maschinenco- 


deprogramms in BASIC-Variablen speichert, 
und die sich nach dem Rücksprung weiterver- 
arbeiten lassen. 

Das folgende Programm zeigt nicht nur die 
Parameterübergabe eines CALL-Befehls, son- 
dern stellt die Ergebniswerte auch noch in die 
Ganzzahlenvariable A%. Die Routine demon- 
striert weiterhin, wie vom Maschinencodepro- 
gramm erzeugte Fehler die Fehlerbehand- 
lungsroutinen von BASIC einsetzen. Das Pro- 
gramm wurde in BASIC II geschrieben. 


10 DIM C 400 
20 zero=&70 
30 FOR I%=0 TO 2 STEP 2 
40 P%=C 
50 [OPT 1% 
60 .code LDA&EOO 
62 CMP#1 
64 BNE error 
70 LDA&603 
80 CMP#4 
90 BNE error2 
100 LDA&601:STA&70 
110 LDA&602:STA&71 
120 LDY#O 
130 LDA&O02:STA(zero),Y:INY 
140 LDA&03:STA(zero),Y 
160 RTS 
170 .error BRK 
180 EQUB 254 
190 EQUS "Parameterzahl nicht korrekt" 
200 EQUB 00 
210 .error2 BRK 
220 EQUB 253 
230 EQUS "Falscher Typ” 
240 EQUB 00 
250 ]:NEXT 
260 A%=0:CALL code, A% 
270 PRINT "Ende der BASIC-Variablen ist";A% 


Das Programm gibt die Endadresse der BASIC- 
Variablen in der Ganzzahlenvariablen zurück, 
die auch als Parameter eingesetzt wurde (und 
zeigt damit, wie CALL Werte an BASIC weiter- 
gibt). Die Zeilen 60 bis 64 prüfen, ob nur ein Pa- 
rameter übergeben wurde. Ist diese Bedingung 
nicht erfüllt, erscheint die entsprechende Feh- 
lermeldung. Zeile 7Obis 90testen, ob der als Pa- 
rameter übergebene Wert eine Ganzzahl ist. 
Falls nicht, wird auch hier eine Fehlermeldung 
angezeigt. Die Zeilen 100 bis 160 übertragen die 
Daten der Adressen 2 und 3in die niederwertig- 
sten Bytes der als Parameter übergebenen 
Ganzzahlvariablen, während 170 bis 240 auf 
weitere Fehler eingehen. 

Zeile 260 schließlich enthält den Befehl 
CALL. A% wird zuvor auf Null gesetzt, da das 
Maschinencodeprogramm die höherwertigen 
Bytes der Ganzzahlvariablen nicht anspricht. 
Nach Ablauf der Routine gibt HIMEM-A% die 
Zahl der Bytes an, die bei Abzug des BASIC- 
Programms und der Variablen noch frei sind 
und für Programme zur Verfügung stehen. 
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Robot-Arm 
Steuer- 
programm 
für den 
Spectrum 


1772 


Sinclairs neue Kraft 


In den letzten zwei Abschnitten des Selbstbau-Kurses wurden die 
Acorn- und Commodore-Programme für den Robot-Arm behandelt. Die 
hier gezeigte Sinclair-Version arbeitet in Verbindung mit dem 


selbstgebauten Spectrum-Interface. 


D: Software für den Robot-Arm muß in Ma- 
schinensprache geschrieben sein, weil die 
Servomotoren in kurzen Zeitabständen mit 
Steuerimpulsen versorgt werden müssen. Eine 
Ansteuerung im 50stel-Sekundentakt läßt sich 
mit BASIC nicht erreichen. Wie in den Program- 
men für den Commodore und Acorn B werden 
die erforderlichen Maschinenbefehle mit Inter- 
rupts erzeugt. 

Die beste Interrupt-Betriebsart für den Z80 
sind IM2-Modus-Interrupts. Wenn dieser Inter- 
rupt-Modus angewählt wird, ermittelt der Pro- 
zessor beijeder Auffrischung des Bildschirmin- 
halts aus zwei verschiedenen Quellen die Start- 
adresse des Interrupt-Programms: Das höher- 
wertige Byte der Adresse steht im Register I, 
der Datenbus liefert das niederwertige Byte. 

Dieses System soll beim 280 der Kommunika- 


BASIC-Loader 


REIN seu#uuu Euren 
REM s#rsuuuuRE RR Hrn 
7 REM #* ** 
a REM #* spectrum arm #* 
REM ** controller ** 
REM ** ** 
Ü REM #axsuHuunRHHr Henne 
Ü REM #auHuHunuHH RER 


CLEAR 38466 
LET sa=44617: REM mc start wedge 
LET np=s4043: REM newpos start address 
» REM dela» factor address 
: REM wedae off 
: REM smooth move start addr 
u [2 "CODE sa 
60 SUB 1886: REM set up 
CLS 
PRINT AT &,2;"would you like tao:" 
a PRINT AT 9,2;"1..proaram new sequence" 
a FRINT AT 18,2;"2..add moves to a proaram" 
PRINT AT 11,25"3..load a file" 
FRINT AT 12,2;5"4..leave program" 
LET g#=INKEY$: IF a$="" THEN 50 TO 176 
IF at="1" THEN LET c=1: LET Im=# 
IF at="1" OR a$="2" THEN 60 SUB Za68: GO SUB 
: 60 SUB 4608: GO SUB Saaa 
IF at="3" THEN 60 SUB shB6 
IF a$="4" THEN CLS : RÄNDOMIZE USR en: STOP 
60 TO 118 


REM #*** set up *#*** 
LET c=1: LET, ns=4: REM no of servos 
LET Im=&: LET oc=#: LET df=18: REM delay fact 


LET mc=186: REM max count 
DIM r(mc,ns): REM Key positions array 
DIM 11): REM lastmax data array 
FOR i=8 TO 3: POÜKE np+ti,d: NEXT i 
RANDOMIZE USR sa 
RETURN 


REM ***%* inform #%*%** 

29 

PRINT AT 3,2;"please use" 

PRINT AT 4,2;"n/m...for 1/r" 

PRINT AT 5,2;"p/l...for ist arm u/d" 
FRINT AT &,2:"a/z...for Znd arm u/d" 
PRINT AT ?,2;"x/c...for grab open/close" 
PRINT AT sarz a position" 
FRINT AT return to menu" 


tion mit Peripheriegeräten dienen, die dem Pro- 
zessor über den Datenbus das niederwertige 
Byte angeben können. In unserem Fall kennen 
wir den Zustand des Datenbusses jedoch nicht 
und müssen alle 256 Möglichkeiten berück- 
sichtigen. Dafür belegt das Programm eine Me- 
mory Page (Speicherseite) für die Startadresse 
des Programms, die mit #FBs vollgeschrieben 
wird. Ist das Register | gesetzt, beginnt die Pro- 
grammausführung nach einem |M2-Interrupt bei 
der Startadresse #FBFB. 

Der Rest des Maschinenprogramms arbeitet mit 
den gleichen Methoden wie die bereits beschriebe- 
nen Programmversionen. Es wird eine Impulskette 
zum E/A-Port 31 geschickt, der mit dem Spectrum- 
Interface gekoppelt ist. Auch das übergeordnete 
BASIC-Steuerprogramm ähnelt der Acorn- bzw. 
Commodore-Version. 


Z894 PRINT AT move to saved position" 
z188 FRINT AT .„..next and back count" 

Zi16 PRINT AT set new count" 

2126 PRINT AT 13,2;5"i/d...to inc/dec speed" 

2138 PRINT AT 1,2;"count=";c;" "; 
2135 FOR i=1 TO 4: PRINT r(c,id;" "3: 

T 

2148 RETURN 

Z21P8: 

30844 REM **** program arm *#%** 

3818 POKE di,i 

3828 LET dx=5 

3836 LET a$=INKEY$: IF a$="" THEN 60 TO 3638 

3435 IF a$="n" THEN LET p=PEEK (np)+tdx: IF p<256 

THEN FÜOKE np,p 

3048 IF at="m" THEN 

EN POKE np,p 

3858 IF a$="p" THEN LET p=PEEK (np+til’+tdx: 

& THEN POKE npti1,p 

386568 IF a$="]" THEN LET p=PEEK (np+t1)-dx: 

THEN POKE np#+1,p 

39865 IF a$="a" THEN LET p=PEEK (np+tZ2)+tdx: 

& THEN PFOKE npt2,p 

3078 IF a$="z" THEN LET p=PEEK (np+2)-dx: 

THEN POKE npt2,p 

3038 IF at="x" THEN LET p=PEEK (np+t33+3*dx: IF pi 

256 THEN FOKE np#+t3,p 
sa76 IF a$="c" THEN LET 

% THEN PFOKE np+S3,p 

3186 IF a$="r" THEN FÜR 4: 
„ids NEXT i 

3116 IF a$="v" THEN LET 

c=1 

3126 IF a$="b" THEN LET 

=mc 

3136 IF a$="e" THEN 
INPUT c 

3148 IF a%="=" THEN FOR i=1 TO 4: LET ric,i)=FEEK 
enpti-1d: NEXT i: LET c=Sc#i 

3145 IF ag="i" THEN LET dx=d«+1 

3147 IF a%="d" THEN LET dx=dx-1: IF dx<1 THEN LE 

T d«=1 

3158 IF c>Im THEN LET Im=c 

31688 IF oc<>c AND c>1 THEN PRINT AT 1,2;"count="; 
CHEN I ROR RL TON ASTBRINEITIGETU EI TI ER NERTTE 
iz PRINT 

3176 LET oc=c 

3198 IF a$<>"q" THEN 

3266 RETURN 

3708: 

4840 REM **** replay sequence *##* 

4818 CLS 

4626 PRINT AT 12,2;"replay sequence y/n,r repeats" 


NEXT i: PRIN 


LET p=PEEK (np)-dx: IF p>& TH 
IF p<25 
IF p>8 

IF p<25 


IF p>8 


£np+3)-3*dx: IF p> 


FOKE np+i-i,ric 


» IF c>mc THEN LET 
IF c£1 THEN LET c 


PRINT AT 2,26;"count value": 


50 TO 34384 


4436 LET a$=INKEY$: IF asi>"y" AND ati>"n" AND a$< 
>"r" THEN 60 TO 48586 

4846 IF a$="n" THEN RETURN R 
4456 IF a%="r" THEN PRINT AT 14,1;"delay factor 1 


LD 
LD 
LD 
RRCA 


esarsa INPUT IE 


4asa IF df<i OR df>255 THEN 60 TO 4858 
4878 POKE dI,df: REM set delar 


4856 FÜR i=1 TO Im 
4878 PRINT AT 1,25" 
4168 FÜR ==1 TO 4 
4118 POKE np#+s-1,rt 
4126 NEXT s: NEXT i 
4148 50 TO 4816 
4770: 

Saaa REM **** save 
Sse1ld CLS 

5824 PRINT AT 12,2; 
sa36 LET g$=INKEY#: 
0 TO Sas8 


register 


no in sequence=";i} 


i,s) 


a file ##*%* 


"save sequence (yin)?" 


IF at£>"y" AND gs<>"n" THEN G 


S5a46 IF a#="n" THEN RETURN 


5858 LET 1(13=1m 


5864 INPUT "filename";f# 
5845 PRINT "press play and record" 
en: REM wedge off 


5467 RANDOMIZE USR 
5070 SAVE f&+".1Im" 


DATA 1) 


Sa84 SAVE f$+".r" DATA r() 
sa: REM wedge back on 


5885 RANDOMIZE USR 

5894 RETURN 

Sy08: 

‘aaa REM **** load 

sala CLS 

‘824 PRINT AT 12,2; 
sa38 LET a$=INKEY$: 
DO TO 6838 

sa4a IF a$="n" THEN 


a file ***%* 


"load a file 


y/n)" 


IF a$<(>"y" AND a$<>"n" THEN 65 


RETURN 


s445 INPUT "filename";tf% 


‘458 FOR i=1 TO mc 
“848 FÜR j=1 TO ns 
+87 LET r(i,,j)=8 

s080 NEXT J: NEXT i 


saFa RANDOMIZE USR en: REM wedae off 


s1a9 LOAD f$+". Im" 
s11a LET Imeltid: L 


DATA 103 


ET c=1m: LET 


‘128 LOAD f$+".r" DATA ri) 
6125 RANDOMIZE USR sa: REM wedge back on 


s134 RETURN 


Assembler Listing 


1508 
1918 

1820 

1638 

1848 

1958 

1868 

1878 

1488 

1978 

2186Fc 1188 
1118 

1120 

1130 

1148 

1158 

1178 

1188 

1198 

1208 

1218 

1228 

1230 

1248 

12506 

1258 

1278 

1289 

1278 

1388 

1345 

1318 

1328 

1380 

1378 

‚1418 

1428 

1438 

1448 

1454 

1458 

1478 

1488 

1478 

1508 

1518 

1528 

1538 

1548 

1558 

1558 

1578 

1539 

PET) 15790 
3E7F 1588 
16F8 1518 
2158FA 1828 
DD2188FA 1438 


oc=d 


;SPECTRUM ARM CONTROLLER 


FORT: EQU 

ORG 
MOTTAB DEFS 
ANGTAB DEFS 
NEWPOS DEFS 
DELAY: DEFS 


E31 
#Frroh 
256 
8 

& 

1 


; SET UP VECTOR TABLE 


INIT: 


LOOP1: 


HL ,#FCaa 
BC, #G6FE 
<HL>,C 
HL 

LOOPI 
cHL> ,C 
A,#FC 
1,4 


;INIT TABLES TO FF 


LOOP2A 


; INTERRUPT 


HANDLE DI 
PUSH 
FUSH 
PUSH 
FLISH 
RST 
61 
CALL 
POP 
FÜr 
FOR 
POP 
(3 
RET 


st+++ EVENT 


EVENT: LD 
LD 
LD 
LD 
LD 


HL ,MOTTAB 
As#FF 
B,#FF 
“HLI A 

L 

LOOPZ 

HL ‚ANGTAB 
E,16 

<HL> ,A 

KR 

LOOFZA 

2 


HANDLER 


#38 ;NML RÜLTINE 


EVENT ;OUR ROUTINE 


ROUTINE ++++ 


B,8 

A,#7FE 
D,#Fa 
HL,FIX+2 
IX „ANGTAB 


us58 
3EFF 
Z188FF 
As 

77 

2C 
18FE 


SEFFE 
DS1F 


DS 
1E84 
16FF 
CDSBFA 
Di 


3EFF 
0588 
2198F® 


EDSBI1AFA 
1SFF 
CDSBFA 


F3 
C337FA 


2 errors: 


FAAD 
FAails 
FASE& 
FASD 
FA1? 
FA38 
FABs 
FABi 
Faal 
FASB 
Far4 


DEC 
D.INZ 


FIX 


;FREF MOTTAB FOR FÜRTSEND 


LD 
LO 
Lb 
AND 
LD 
INC 
D.NZ 
j++++ START 
LD 
Our 


E,8 
A,HFF 
HL ,MÜOTTAB 


FULSES ++++ 


A,H#FF 
<PORTI ‚A 


ıt+++ CALL DELAY ++++ 


PUSH 
LD 
LD 
CALL 
POP 


DE 
E,4 
D,#FF 
öLOOP 
DE 


s+t+++ SEND MOTTAB TO FÜRT ++++ 


LD 
LD 
LD 
OTIR 


LD 
LD 
LD 
LD 
INC 
DUNZ 
RET 
it++r+ DELAY 
H 
OLOOP: DEC 
RET 
ILOOP: DEC 
JP 
JP 


C,FORT 
B,#FF 
L,a8 


++++ RESTORE MOTTAB TO FF +++ 


A,#FF 

B,6 

HL ‚MOTTAB 
<HLI ,A 

FÜ 

LOOoP4 


LOOP ++++ 


utrt+t RESTORE IM 1 ++++ 


REST: IM 
‘.RET 


1 


b 
s+t+++ SMOOTH MÜVER ++++ 


; 
START: LD 


NEXMOT 


2,4 
B,4 SET UP COUN 
HL ,ANGTAB+ 3 

DE ‚NEWPÜS+3 

A,CHL> 

DE,HL 

<HL)> 

DE,HL 

2 ,MOVED :SAME 

© ,ADD ; BORROW 
HL)» 


DE,“DELAY) 

D,#FF 

ÖLOOF ;CALL DELAY 
DE 

Ar 

NZ ‚START 


s++++ SET UP HÄNDLER ++++ 
;t+++ JUMP ADDRESS ++++ 


ORG 
DI 
Jr 


66 


ANGTAB 
EVENT 
HANDLE 
INIT 
LOOPZ 
LOOP3 
MOTTAB 
NEWPOS 
NEXT 
FORT 
START 


#FEFB 


HANDLE 
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Piraten 
voraus! 


In diesem Teil uns 
efassen wir uns mitden 
vier ‚Hanpisrelguiesen, 


. Chiff ve von Piraten angegriffen 


werden, durch einen Sturm vom 


TER 


Kurs abkommen oder das Ruder 
des Schiffes brechen. 


D:“ die Unterroutine bei Zeile 6500, die 
eine Zufallszahl generiert, wird das Pro- 
gramm per Zufallsfaktor zur Hauptereignis-Un- 
terroutine verzweigt. Um auch die neuen Mög- 
lichkeiten ansprechen zu können, müssen die 
ersten Zeilennummern der vier Ereignis-Routi- 
nenin dieser Zeile eingetragen werden. Zeile 


6510 sollte dann wie folgt SE 


6510 ONX GOSUB ‚6530, 6700, 6800, 6900, 

7000, 7050 
Die dritte Nummer ruft eine Unterroiftine an in 
der das Schiff von Piraten angegriffen wird. Das 
Programm überprüft, ob das Ereignis bereits 
einmal eingetreten ist, indem das Flag M(3) un- 
tersucht wird. Ist M(3)=1, erfolgt der Rück- 
sprung zum Hauptprogramm. Ansonsten wird 
der Programmlauf fortgesetzt und M(3) a in 
Zeile 6818 auf 1 gesetzt. 

Theoretisch ist es möglich, daß die hs 
Mannschaft tot ist, und somit wäre ein Piraten- 
angriff irrelevant. Daher wird eine Schleife 
durchlaufen, mit der das Stärke-/Typ-Array 
TS(T,2) untersucht wird. Dabei werden alle Mit- 
glieder mit den Werten O.oder -999 gezählt. 
Diese Werte werden in X addiert. Ist X=16 (alle 


m « sind tot), erfolgt a zum HRUPIPRR 


Zeile 6825 wird K auf diesen Wert Sacaht sowie 
das entsprechende Vorrats-Array OA(2) darauf 
untersucht, ob Waffen an Bord sind. Ist der Wert 
von OA(2) Ooder -999, gibtes keine Waffen, und 
K wird auf 4 gesetzt. Stehen Waffen zur Verfü- 
gung, wird in SS „IN THE SPITE OF YOUR 
GUNS" abgelegt. Wurde K auf 4 gesetzt, wird in 
SS „YOU HAVE NO GUNS" abgelegt. 


: res Pong 6845 eine weitere Schleife gestartet, mitder 


es zuzählen. Ist der Stärkewert eines Elementes 0 


Ansonsten wird durch Zeile 6840 der Wert auf 


"sie dient als a das anzeigt, ob ein Mechani- 


en "Abschließend wird zwischen den Zeilen 6836 


die Anzahl an Männern gelöscht wird. In Zeile ; 
6835 wird X auf 0 gesetzt, um den Vorgang mit- 


_.oder- -999, wird das nächste Element untersucht. 


-999 gesetzt und der Wert vonX um l erhöht. Ist 
der Wert von X=K, wird durch Zeile.6842 der 
Schleifenzähler T auf 16 gesetzt und die 
Schleife beendet. Sind nurnoch weniger Män- 
ner vorhanden als durch K angegeben, wird die 
Schleife nach 16 Durchläufen verlassen. Die. 
Zeilen 68280der 6830 geben die Anzahl derge- 
töteten Männer an, 


‚ Das Ruder bricht 


Düne das nächste Ereignis wird das Ruder be- 
schädigt. ' ‚Haben Sie einen Mechaniker ange- 
heuert (und isternoch am Leben), ist der Scha- 
den ohne große Verzögerung schnell behoben. 
Ist dies nicht der Fall, verlängert sich die Reise- 

erröutine beginnt 
bei Zeile 6900 (die vierte Zeilennummer hinter 
ON X GOSUB in Zeile 6510). Auch hier wird 
überprüft, ob das Ereignis bereits eingetreten 
ist oder noch nicht. | 

Der Wert von X wird auf 4 gesetzt, was der An- 
zahl an Wochen entspricht, um die sich die 
Fahrt verlängert, wenn kein Mechaniker an 
Bord ist. Danach wird TS(,) nach einem leben- 
den Mechaniker durchsucht. Zwischen den Zei- 
‚len 6930. bis 6938 wird eine Schleife initialisiert, 
die das Typ-Array TS(,) nach dem Wert 3durch- 
sucht, wobei der Stärkewert nicht 0 oder -999 
sein darf. Sind alle Bedingungen positiv, wirdX 
von 4 auf l gesetzt, und die Fahrtzeit verlängert 
sich nur um eine Woche. 

Auf dem Bildschirm erscheint entweder die 
Meldung: „ALTHOUCH YOU HAVE A MECHA- 
NIC" oder, wenn X—=4, „YOU HAVE NO MECHA- 
NIC AND". Danach wird die zusätzliche Reise- 
dauer dargestellt und in Zeile 6965 zu der Ge- 
samtfahrzeit EW addiert. Ein Tastendruck setzt 
das Spiel fort. Die Variable X hat zwei Aufgaben: 
Sie beinhaltet die zusätzliche Wochenzahl, und 


Te FESTE 7 ELLE TEN REN EN NEE ELLUN ZELTE 


ab Zeile 7000 istein Sturm. Den ihn ee 
Schiff vom Kurs ab, wodurch sich die Reisezeit 
verlängert. Ist ein Navigator an Bord, wird das 
Schiff schnell wieder auf den richtigen Kurs ge- 
bracht. Ohne Navigator dauert die Fahrt länger. 


Diese Unterroutine ähnelt strukturell der Ruder- 
Routine und nutzt auch einzelne Programmteile 

dieser Routine. 
Wieder wird überprüft, ob das Ereignis schon 
eingetreten ist, und bei negativem Er- 
q gesetzt. Die ZU- 


Kann 7038. durchsucht ‚das een 
. nach einem Navigator (=4 im Typ-Array) u 


ray). Ist die Suche erfolgreich, werden X aufl 
und % auf 16 gesetzt, so daß das Programm die 
Schleife verläßt. 
$ wird, entsprechend dem Wert von X, die 
Meldung „ALTHOUGH YOU HAVE A NAVIGA- 
TOR" oder „YOU HAVE NO NAVIGATOR AND" 
. zugeteilt. "Anschließend verzweigt das Pro- 
gramm zu Zeile 6950 (Unterroutine für das Ru- 
‚..der), um die Programmteile zu verwenden, die 
tet zusätzliche Reisedauer, die Erhöhung 
von EW, die Reisezeit mit X und den Rück- 
sprung zum Hauptprogramm zuständig sind. 
Das letzte Hauptereignis ist das Sichten einer 
Insel (Unterroutine ab Zeile 7050). Dies ist die 
letzte Zeilennummer in der ON X GOSUB-An- 
weisung in Zeile 6510. Da die Insel nichtaufdem 
‚ Kurs liegt, kostet ein Besuch zusätzliche Zeit. 
. Durch den Besuch besteht jedoch die Chance, 
‚ die Vorräte aufzufrischen. Der Spieler muß sich 


der Bariton davon abhängig, ob und wie 
. man dem Albatros begegnet ist. Hat der Spieler 
den Albatr “geschossen, werden Sie keinen 
' Erfolg haben! | 


| f 
a  Lanäinsicht ZB 
LandinSicht BR 
ze 


I. ER erfolgt die übliche Kontrolle, 0 Be 
' schon n eingetreten ist. Danach wird der Spieler 
informiert, daß eine Insel in Sicht ist, 

die Möglichkeit zum Auffrischen der Vorräte 
ei eht. Nach der Aufforderung zur Entschei- 
du ng wart das Programm (Zei ile 7082) auf eine 
Antw ort. Antwortet der Spieler mit N, Siiote 
durch Zeile 7086 Rücksprung zum Hauptpro- 
gramm. Bei positiver Antwort Sreicht der Spie- ' 
ler die Insel bei Zeile 7100. 

Jetzt überprüft das Programm in Zeile 7106, ob 
der Albatros geschossen wurde, Trifft das nicht 
zu, bleibt der Inhalt von BS$ (inZeile48aufNge-_ 
setzt) unverändert, und der Programmlauf wird. 
mit Zeile 7110 fortgesetzt. Hat der Spieler den 


| 


Vogel getötet, wird BS mit Zeile 6162 der Alba- — 
tros- Unterroutine aufYı GEÄngEH- In diesemFall 


En ; B wird an en „Mord“ erinnert. 
nschteßend verzweigt das Programm zu Zeile 
7130, wo die Reisedauer erhöht wird. 

Wurde der Vogel nicht geschossen, initiali- 
siert das Programm in Zeile 7110 eine Schleife, 
die zum Aufnehmen der Vorräte von 1 bis 4 (für 


und - 
einem Stärkewert größer als 0 (im Stärke-Ar- = 4 es 


die vier Vorratsarten) dient. Die jeweiligen 


‘Mengen werden zufällig bestimmt. In Zeile 7112 


wird ein Zufallswert generiert. Ister kleiner 0.25, 
erfolgt der nächste Schleifendurchlauf. In Zeile 
7115 wird eine Zufallszahl zwischen 5und l4ge- 
neriert und in X abgelegt. Diese Menge wird 


. durch Zeile 7120, gefolgt von der Einheit des je- 


 weiligen Vorrates (Kilo oder Barrel), ausgege- 
‘ben. Wurde ein Vorrat in der aktuellen Woche 


a — 


We 


über Bord gespült, steht der entsprechende 
Wert im Vorrats-Array auf -999, In diesem Fall 
‚werden diese Werte durch Zeile 7122 auf 0 ge- 
‚setzt, damit die neuen Vorräte addiert werden 
können (Zeile 7128). Anschließend wird die Rei- 
st dauer‘ um eine oder zwei AENEN verläng = 


hung vorgenom. en IN 6% soll a Spieler 
wird informiert und die zusätzliche Zeit in Zeile 
T140 zu Ew addiert + 


! 


Modul neun: 
weitere Hauptereignisse 
Initialisiere Flags 


48 As="N" 


: BE="N" 


Piraten- Unterroutine 


Cr un Un 
co co cc 


CR Ch 


REM FIRATES 
=1 THEHNFETUFH 


er THESSHIEI=IZ: au 


En 
FORT= 


PRINTX; 
OF THE CREW 15 KILLED«" 
>I THENS$="OF THE CREW ARE KILLED#" 


SETIS: IFI$=""THEN 


:77 RETUFN 


Ruder-Unterroutine 
FA REM RUÜDDER 


IFMÜ45=1THENRETUFN 
FRINTEHRE& 147 
= 


SANDTSET,ZIES>AANDTSET,Z> 


ALTHÖUGH YOU HAuE A MECHANICH" 
THENSE=" YOU HAWE NO MECHÄANIC 

Era 

Your JOUFRNEY 
X: "WEEKRS 


AND" 


WILL TAKE*" 608 
LONGER" 


GETI&: IFI$=""THEN 
RETURN 


REM STÜORM 
IFMCS5=1THENRETURN 
FRINTCHRE(147) 


ANDTSET,ZIK 


"ALTHOUGH Yo HAWE A MAUTGATÜR=" 
TE Nee TON HAWE MO OHAUIGATOR AND" 


Insel-Unterroutine 


NESENESENE, 


SINN 


2 BETA Nenn 


28 FRINT-NDTHINGEN 


' PRIN S+= 


REM 
IFM« 
FRI 
r 


ISLAND 

’>=1 THENFETURHN 
TCEHR&E147I 
ISLAHND#" :GOSUEFIR 
S$="WHERE vol MAY BE ABLE TO%*":6GOSUBF1A6 
Ss$="RE-STÜCK YOUR FROWISIONS=":GOSUEFIOR 
St="BUT IF Yüou 50 THERE#*" :GOSUB?1A0 
st="IT WILL Abb TIME TO YOuUR JOURNEY*" 


CHARTS SHOlM AN 


: SOSUEF 


FRINT:GOSLUEFZAA 

="bo You) WANT TO GO THERE*" 
INFUTIS:I#=LEFTEÜI#,1:! 
IFIESH"V"ANDIEC> 


:GOSUBF1BO 


UBER 


all REACH THE ISLAND®": 
AND OBTAIN:#":GOSUEFIAR 
IFB&="N"THENTI1@ 
PRINT: GOSUBFZEB 
GÜSUETFZAA 


$=" REMEMBER THE ALBATROSS! )" :50SUBF184:G0TO 
FORT=1T04 
IFRND(13<.2STHEN?12F 
X=INTERND(19*10)+5 
$CT);"S OF"SPECT) 
-FFFTHENPAGTI=B 
PACTI=SFALTIHX 
NEXT 
="BUT THE JOURNEY WILL NOW TAKE*" :GOSUEFI 
Xx=INTERNDELD#ZI +1 


"WEEKS LÜNGER*" :GOSUBFI1AA 


EIJ=ElI+ 

FRINT :5OSUBFZOR 
5t=K$:505UB?71A08 
GETI£:IFI$=""THEN?LSS 
RETURN 


BASIC-Dialekte 


Spectrum 
Ändern Sie das Programm wie folgt: 


6512 IF X=3 THEN GOSUB 6800 
6513 IF X=4 THEN GOSUB 6900 
6514 IF X=5 THEN GOSUB 7000 
6515 IF X=6 THEN GOSUB 7050 


6820 CLS 

6895 LET-IS=INKEYS: IF I$= 
6910 CLS 

6970 LET IS=INKEYS: IF 1$=""THEN GO TO 6970 
7010 CLS 

7060 CLS 

7082 INPUT I$: LET I$=1$(1 TO 1) 

7155 LET I$=INKEYS: IF I$=""THEN GO TO 7155 


“”THEN GO TO 6895 


Acorn B: 
Führen Sie folgende Änderungen durch: 


6820 CLS 
6895 I$-=GETS 
6910 CLS 
6970 I$=GETS 
7010 CLS 
7060 CLS 
7155 1$=GET$ 


Reden ist Silber 


Sprachsynthesizer gibt es heute für fast jeden Heimcomputer. Wir 
stellen zwei neue Sprachsynthesizer für den Acorn B und den 
Schneider vor. Was haben sie uns zu sagen? 


KW den letzten Jahren hat die Sprachsynthese 
große Fortschritte gemacht. Allmählich drin- 
gen Synthesizer auch in den Bereich derkleine- 
ren Computersysteme vor. Frühere Synthesizer 
hatten eine Liste von Wörtern in ihrem Speicher. 
Wenn Text eingegeben wurde, verglichen sie 
die empfangenen Wörter mit dem Speicherin- 
halt. Bei Übereinstimmungen wurde ein Unter- 
programm aufgerufen, um das gefundene Wort 
aus einer Tonfolge zusammenzusetzen. Mo- 
derne Sprachsynthesizer sind leistungsfähiger 
— der Anwender kann einen beliebigen Satz 
eingeben, der von den Geräten in Wörter um- 
gesetzt wird. 

Es ist ziemlich schwierig, einen geschriebe- 
nen Text in verständliche Sprache umzusetzen. 
Die Komplexität von Sprache übertrifft auch 
noch das ausgefeilteste Computerprogramm. 
Ein Beispiel: Die Wörter „naiv“ und „Mai“ bein- 
halten die gleichen Vokale, die jedoch völlig 
unterschiedlich ausgesprochen werden. Ein 
Computer kann also höchstens versuchen, die 
richtige . Aussprache zu treffen. Moderne 
Sprachsynthesizer sind zwar nicht perfekt, er- 
zielen aber bereits recht bemerkenswerte Er- 
gebnisse. 


Ausnahmen der Regel 


Diese Systeme lesen eine Kette von ASCII-Zei- 
chen in einen Bufferspeicher. Jedes Wort wird 
geprüft und mit einer Reihe grammatikalischer 
Regeln verglichen, die vom Programmierer de- 
finiert worden sind. Teile eines Wortes werden 
nach bestimmten Ausspracheregeln interpre- 
tiert. Eine solche Regel könnte etwa lauten: Ein 
„ch“, das auf ein „e“ oder „i“ folgt, wird anders 
als nach anderen Vokalen artikuliert. Durch 
diese Regel würde sich etwa das „ch“ in „dich“ 
von „doch“ unterscheiden. Das Problem von 
Sprache, speziell der deutschen Sprache ist 
aber, daß sie zwar festen Regeln folgt, aber eine 
Vielzahl von Ausnahmen enthält: Nach der 
oben erwähnten Regel würde das „ch“ in 
„Fuchs“ nicht definiert. Also wird bei vielen 
Sprachsynthesizern zusätzlich eine Liste der 
häufigsten Ausnahmen vorgesehen. Der be- 
grenzte Speicherplatz eines Computers macht 
es aber unmöglich, alle Ausnahmen zu berück- 
sichtigen. Selbst wenn genügend Speicherka- 
pazität vorhanden wäre, würde sich beim Über- 
prüfen aller Möglichkeiten eine unannehmbar 
lange Verarbeitungszeit ergeben. 


Bei den hier vorgestellten Geräten handeltes 
sich um den Namal Type & Talk für den Acorn B 
und den Amsoft-Speech-Synthesizer für den 
Schneider, die beide mit einem System von Re- 
geln für die Erzeugung allerdings von engli- 
scher Sprache arbeiten. 

Der Type & Talk gehört zu den Peripheriege- 
räten, die für die Nutzung des Acorm B an engli- 
schen Schulen entwickelt wurden. Das Gerät 
befindet sich in einem beigefarbigen Metallge- 
häuse. Angeschlossen wird der Synthesizer 
entweder über die Centronics- oder die RS423- 
Schnittstelle. Die Buchsen dafür liegen an der 
Rückwand des Gerätes, wo auch der Anschluß 
für einen externen Lautsprecher ist. 

Vorn am Gerät sitzen rechts und links des 
Lautsprechers der Ein/Ausschalter und ein 
Lautstärkeregler. Im Inneren finden sich zwei 
Leiterplatten, eine für das Netzteil und die Syn- 
thesizerlogik, die zweite zur Verstärkung des 
Tonsignals und die eigentliche Lauterzeugung. 


Auf der ersten Platine gibt es neben den Logik- 
elementen ein 8K-EPROM, das den Wörter- 
buch- und Regelspeicher enthält. Die Umset- 
zung der Informationen vom Computer für das 
Einspeisen in den Synthesizer-Chip besorgt ein 
NEC D780C-Prozessor, der fast völlig dem Z80 
gleicht. Auf der Platine finden sich außerdem 
zwei KByte RAM, die als Buffer für eingehende 
Signale dienen. Mit acht DIP-Schaltern kann 
das Gerät auf die Baudrate der ankommenden 


Der Namal Type & Talk 
ist der Sprachsynthesi- 
zer für den Acorn B. 
Das Gerät verfügt über 
einen eigenen Micro- 
prozessor, die Software 
befindet sich im ROM. 
Der Synthesizer wurde 
speziell für Schulen 
und Fortbildungsein- 
richtungen konzipiert. 
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E Peripherie 


Amsoft Speech 
Synthesiser 


SPRACHCHIP 
SPO256 


BETRIEBSARTEN 
Umsetzung Text- 


Sprache und Allophon- 
Modus 


SPRACHAUSGABE 
Lautsprecherpaar 


SCHNITTSTELLEN 


Erweiterungsanschluß 
für den Diskettenport, 
HIFI-Ausgang. 


VORZÜGE 


Echte Text-Sprach- 
umwandlung. 


NACHTEILE 


Das Verzeichnis der 
grammatikalischen 
Regeln ist nicht so 
umfangreich wie bei 
Type & Talk. 


Im Verhältnis zum Type 
& Talk hat der Amsoft 
Speech Synthesiser 
einen weitaus günstige- 
xen Preis, obwohl auch 
dieses Gerät nach dem 
Verfahren grammatika- 
lischer Regeln arbeitet, 
das man sonst nur bei 
teuren Modellen findet. 
Die Software wird über 
Cassette geladen, die 
eigentliche Umsetzung 
von Text in Sprache 
führt der Prozessor des 
Computers aus. Voraus- 
setzungen für einen 
Einstieg in die Sprach- 
synthese mit kleineren 
Computern bringt aber 
auch dieses eher 
schlichte Gerät mit. 
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Signale und andere Bedingungen des „Hand- 
shaking"-Betriebs eingestellt werden. 

Fast ein Drittel der Platine belegt das einge- 
baute Netzteil. Es ist recht angenehm, die 
Stromversorgung in einem Gerät integriert vor- 
zufinden — es gibt nicht so viel Kabelsalat. In 
diesem Fall scheint man aber nicht alle Pro- 
bleme dieser Lösung bedacht zu haben: Nach 
mehrstündigem Betrieb zeigt das Gerät Änzei- 
chen von Überhitzung, die sich in verringerter 
Sprachqualität ausdrücken. 

Auf der zweiten Platine befinden sich Ver- 
stärker und ein Regler, mit dem die Geschwin- 
digkeit der über den Lautsprecher ausgegebe- 
nen Sprache eingestellt werden kann. Die ei- 
gentliche Spracherzeugung besorgt der Syn- 
thesizer-Chip Votrax SCO1lA, den man auch in 
vielen anderen Sprachsynthesizern findet. 

Nach dem Anschluß des Gerätes an den 
Rechner ist die Spracherzeugung erstaunlich 
einfach. Der Type & Talk verkündet die Mel- 
dung „Ready Master" und zeigt so seine Ar- 
beitsbereitschaft an. Da der Synthesizer seine 
Signale (im ASCII-Format) über die Drucker- 
Schnittstellen erhält, muß der Computer so ein- 
gestellt werden, daß er alle Bildschirmeinga- 


Acorn B geht das entweder durch Eintippen von 
VDU 2 oder durch Übemittlung eines CTRL 
B-Zeichens zum Type & Talk. Danach werden 
sofort alle eingetippten Sätze oder Wörter vom 
Synthesizer gesprochen. 

Die Funktionsweise des Type & Talk-Sy- 
stems und auch seine durch die Hardware be- 
dingten Grenzen kennen wir. Um trotz der 
Schwierigkeiten eine korrekte Aussprache zu 
erlangen, ist es häufig notwendig, die Schreib- 
weise eines Wortes zu verändern. Es braucht 
manchmal eine Menge Einfallsreichtum, bis 
Worte richtig klingen. Das englische Wort 
„bough“ (Zweig) wird vom System genau so in- 
terpretiert wie das Wort „cough“ (Husten) und 
wie „boff" ausgesprochen. Auch wenn man 
„bow“ als alternative Schreibweise eingibt, er- 


Sprach-Chip 

Zur Sounderzeugung 
wird ein Votrax 
SCO1A benutzt. 


Schnitt- 

stellen 

Wahlweise Jergen 
Bang er VEerto- 
DICH Oder RSA20, 


Lautschrift 


Im Gegensatz zum Lesen, wo ein Wort an sei- 
ner Schreibweise wiedererkannt wird, erken- 
nen wir das gesprochene Wort am Zusam- 
menklang der „Phoneme“, der einzelnen 
Lauteinheiten. Die Zusammenfassung mehre- 
rer Phoneme bildet den „Körper“ des Wortes, 
und die kleinen Abweichungen (je nach dem 
Kontext des Wortes und seiner Stellung im 
Satz) werden durch „Allophone“ erzeugt. Das 
englische „ch“ kommt im Wort „chip“ ebenso 
vor wie bei „batch“, wird dabei aber völlig 
verschieden ausgesprochen. Die Abweichun- 
gen in der Aussprache werden durch die 
Allophone erzeugt. 

Die folgenden Beispiele zeigen die großen 
Unterschiede zwischen der phonetischen und 
der üblichen Schreibweise englischer Texte: 


1 a utstärke- 


klingt das Wort so, wie es bei „low“ richtig wäre. 
Die richtige Aussprache erreicht man erst mit 
der Schreibweise „bou". 

Die Betonung auf einzelnen Silben läßt sich 
durch Eingabe von Steuerzeichen zwischen 
den einzelnen Buchstaben erreichen. Zur Un- 
terscheidung von normalen ASCII-Zeichen wird 
ihnen ein ! vorangestellt. Beispiel: HEL!InLO, 
wobei I für Tonfall steht und n eine Zahl zwi- 
schen O und 3 ist. 

Noch weit größere Wandlungsfähigkeit er- 
möglicht der mit !P aufrufbare Phonem-Modus. 
Phoneme sind Zeichenketten, aus denen sich 
Worte aus einzelnen Lauten kombinieren las- 
sen. (Phonetische Schrift oder Lautschrift findet 
man sonst häufig in Wörterbüchern, wo sie in 
Klammern hinter dem Haupteintrag die Aus- 
sprache eines Wortes erklärt.) Aus den Laut- 
schriftzeichen kann theoretisch jede beliebige 
Lautfolge zusammengesetzt werden. 

Ganz anders arbeitet der Amsoft Speech Syn- 
thesiser. Das Gerät kann direkt am Disketten- 
port des Schneider-Computers angeschlossen 
werden. Die Umsetzung von Text in Sprache 
wird vom Prozessor des Computers selbst erle- 
digt, wobei das eigentliche Wörter- und Regel- 
verzeichnis von der Cassette geladen werden 
muß. Die Steuerbefehle gelangen auf etwas an- 
dere Weise zum Synthesizer als beim Acorn B: 


Es gibt neun Befehle, mit denen sich das Gerät 
von Basic aus steuern läßt. Diese Befehle sind, 
wie das Disketten-Betriebssystem des Schnei- 
der, fest integrierte Systemerweiterungen 
(RSX). Das Problem dabei ist, daß Parameter 
erst in Strings umgewandelt werden müssen, 
bevor sie an die RSXs übergeben werden kön- 
nen. So erfordert etwa der Befehl ISAY (zusam- 
men mit IECHO die Anweisung für direkte Text/ 
Sprachumwandlung), daß der einzugebende 
Satz erst als String definiert werden muß. Das 
IECHO-Kommando zur Wiedergabe des Bild- 
schirminhalts verfügt glücklicherweise über 
die Fähigkeit der Parameterübergabe. 


Leistungsunterschiede 


Der Amsoft Speech Synthesiser erreicht weder 
in der Wiedergabequalität noch beim Umset- 
zen selbst die Leistungen des Type & Talk. 
Ganz überraschend ist das nicht — das Amsoft- 
Gerät ist erheblich preiswerter als der Type & 
Talk. Beim Amsoft Speech Synthesiser gibt es 
sehr viel weniger Regeln, die auch nicht so 
streng beachtet werden wie beim Type & Talk. 
Daher werden im Amsoft-Produkt viele Wörter 
falsch ausgesprochen, die beim Konkurrenten 
auf Anhieb richtig klingen. So wird etwa aus 
„able“ „abble“ und „cough" klingt wie „cowf". 
Einfallsreiche Schreibweise hilft aber auch in 
diesen Fällen oft weiter, ebenso wie bei deut- 
schen Wörtern. 

Ein zusätzliches Kommandowort für den Am- 
soft ist JAPHONE, das ungefähr dem !P-Befehl 
des Acorn-Synthesizers entspricht und den 
Aufbau von Wörtern aus ihren Grundkompo- 
nenten ermöglicht. Allerdings wird in diesem 
Fall mitsogenannten „Allophonen" gearbeitet — 
das sind die Bausteine, aus denen sich die oben 
erwähnten „Phoneme“ zusammensetzen, also 
noch kleinere Bruchstücke von Lauten. Auf den 
Befehl IAPHONE folgt eine Reihe von Zahlen, 
die jeweils einem bestimmten Laut-Bruchteil 
entsprechen. Das geht zwar nicht ganz so 
schnell und direkt wie beim Type & Talk, weil 
man sich die Zahlen heraussuchen muß, aller- 
dings gewöhnt man sich relativ schnell an die- 
ses Verfahren. 

Die Sprachsynthese ist zwar aus den Kinder- 
schuhen heraus, ein Randproblem ist aber im- 
mer noch nicht gelöst: Die Synthesizer spre- 
chen nach wie vor im „Roboter-Sound“. Auch 
die Beachtung der Sprachregeln macht oftnoch 
Schwierigkeiten und läßt Raum für Weiterent- 
wicklung. Die Hochleistungstechnologie hat 
zwar bereits erhebliche Fortschritte gemacht, 
doch sind diese Techniken gegenwärtig noch 
zu aufwendig und teuer, um sie auf kleinere 
Computer umzusetzen. Allerdings kann man 
darauf hoffen, daß die CD-ROMs (ROM auf 
Compact-Disks) hier neue Wege eröffnen. Die 
beiden vorgestellten Geräte zeigen im Ansatz 
bereits, zu welchen Leistungen zukünftige 
Sprachsynthesizer fähig sein werden. 
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Eng gepackt 


Das Bild zeigt die Spei- 
cherbereiche, in denen 
die verschiedenen Teile 
von CP/M unterge- 
bracht sind. 

An der Speicherunter- 
grenze, auf der Zero 
Page, befinden sich die 
Systemvariablen, die 
Einsprungspunkte und 
der Urlader. Darüber 
liegt der Programm- 
speicher (TPA), dessen 
Obergrenze sich ver- 
schieben läßt, so daß 
Dateien, die normaler- 
weise nicht in den Spei- 
cher passen, den „Con- 
sole Command Proces- 
sor“ überschreiben 
können. Oben im Spei- 
cher liegen die Routi- 
nen des BIOS und 
BDOS. Sie dürfen nicht 
überschrieben werden, 
da sie bei der Befehls- 
ausführung ständig ein- 
gesetzt werden. 


Vielversprechend 


In der letzten Folge unserer CP/M-Serie sehen wir uns an, wie der 
begrenzte Platz im RAM von den CP/M-Modulen optimal eingesetzt 
wird. Wir untersuchen weitere Funktionen der drei CP/M- 
Hauptmodule und werfen einen Blick auf die Zukunft dieses 


weitverbreiteten Betriebssystems. 
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D: drei Hauptmodule von CP/M befinden 
sich an der Obergrenze des Arbeitsspei- 
chers. Ihre Startadressen sind von Version zu 
Version verschieden. Das BDOS (Dateiverwal- 
tungssystem) und das BIOS (Ein/ Ausgabesy- 
stem zur Steuerung der Peripheriegeräte) lie- 
gen direkt unter der Obergrenze des Spei- 
chers. An diese beiden Module schließt sich 
der Befehlsinterpreter CCP an. 

Die ersten 256 Bytes (Zero Page) am ande- 
ren Ende des RAM enthalten die Systemvaria- 
blen und Informationen, die CP/M zum Funk- 
tionieren braucht, etwa die Einsprungspunkte 
zu den BDOS- und BIOS-Bereichen und zum 
Urlader. Da während des Arbeitsvorganges 
CP/M-Routinen nachgeladen werden, muß der 
Urlader im RAM bleiben. 

Auf der Zero Page liegt auch der „Transient 
File Control Buffer“ (TFCB — Buffer für Dateiin- 
formatinen). In der vorigen Folge wurde be- 
reits erwähnt, daß der CCP beim Laden einer 
Diskettendatei einen vorläufigen File Control 
Block (FCB) anlegt. Das BDOS vergleicht die 
Dateinamen des Directories mit diesen Buffer- 


daten und übergibt dann Informationen der Di- 
rectoryspur an das CCP. Diese Informationen 
werden im TFCB gespeichert. 

Zwischen der Zero Page und dem CCP liegt 
der Programmspeicher (Transient Program 
Area — TPA). Er ist der eigentliche Arbeitsbe- 
reich von CP/M. Wenn ein Befehl an das Be- 
triebssystem übergeben wird, durchsucht der 
CCP zunächst die Liste der eingebauten CP/ 
M-Befehle. Findet er dort keine Übereinstim- 
mung, nimmt er an, daß es sich um einen Dis- 
kettenbefehl handelt und veranlaßt das BDOS, 
die Diskette zu durchsuchen. Das BDOS sieht 
nun auf der Systemdiskette nach, kopiert das 
(gefundene) Maschinencodeprogramm von 
$100 an (das erste Byte der Seite 1 des Arbeits- 
speichers) in den TPA und veranlaßt dessen 
Ausführung. 

Um mit CP/M arbeiten zu können, müssen 
mindestens 16 KByte RAM frei verfügbar sein. 
Das scheint recht wenig zu sein, wenn man be- 
denkt, daß dort außer den normalen Program- 
men auch CP/M Platz finden soll. Da das Be- 
triebssystem jedoch nur einen kleinen Teil des 
Speichers belegt, stehen für den TPA sieben 
KByte zur Verfügung (bei minimalem Spei- 
cherausbau endet der TPA bei $2900, die Zero 
Page wird für Systemvariablen eingesetzt und 
der Rest für CP/M). 

Da die meisten Diskettenbefehle nur zwei 
bis drei KByte belegen, steht der übrige TPA 
für Dateien zur Verfügung, die von diesen Be- 
fehlen bearbeitet werden. Der TPA wird also 
nicht nur für Programme, sondern auch für Da- 
teien genutzt. 


TPA-Daten überlagern CCP 


Hier entsteht bei minimalem Systemausbau ein 
Problem. Wenn von den sieben KByte TPA drei 
KByte für Diskettenbefehle eingesetzt werden, 
bleiben nur vier KByte für weitere Daten übrig. 
Selbst für kleine Programme reicht das kaum, 
längere Textdateien haben darin überhaupt 
keinen Platz. Nun ließe sich der Speicher — 
und damit auch der TPA — durch den Einbau 
zusätzlicher RAM-Chips bis auf 64K erweitern 
(der Speicherbereich, der von CP/M direkt 
adressiert werden kann), doch schafft es 
CP/M auch bei minimaler Auslegung, dort 
mehr als vier KByte unterzubringen. 


Die Lösung ist einfach: TPA-Daten, die über 
vier KByte hinausgehen, „überlagern“ den 
CCP. Wie alle Betriebssysteme akzeptiert 
CP/M während der Ausführung eines Befehls 
keine weiteren Befehle und kann daher das 
CCP überschreiben, das zu diesem Zeitpunkt 
nicht gebraucht wird. 

Für die Aufnahme eines neuen Befehls muß 
CP/M nach Beendigung eines Ablaufs des 
CCP neu laden. Der letzte Vorgang eines Dis- 
kettenbefehls ist daher immer der Aufruf der 
„Location Boot“-Routine (Adresse $0005 auf 
der Zero Page). Über diesen Einsprungspunkt 
lädt das Betriebssystem das CCP-Modul wie- 
der in den Speicher und ist dann bereit, den 
nächsten Befehl entgegenzunehmen. 

Da die Hardware zum Zeitpunkt der Ent- 
wicklung von CP/M noch sehr teuer war (be- 
sonders die RAM-Chips), besaßen nur wenig 
Maschinen mehr als 16 KByte RAM. Die Soft- 
ware mußte sich nach den vorhandenen Gren- 
zen der Maschinen richten. 


Bereiche überlappen 


In CP/M überlappen sich daher einige Berei- 
che, um so wenig Speicher wie möglich zu be- 
legen. Auf BDOS und BIOS konnte nicht ver- 
zichtet werden, da viele Befehle sie ständig für 
den Dateizugriff oder Ein- und Ausgabevor- 
gänge brauchen (beispielsweise zur Zwi- 
schenspeicherung einer Druckdatei oder für 
die Bildschirmanzeige von Daten). CCP und 
TPA sind jedoch nie gleichzeitig aktiv, und so 
entschieden sich die Designer von CP/M, 
beide in den gleichen Bereich zu legen. 

Gary Kildall und sein Team verdienen große 
Anerkennung für die Entwicklung eines Sy- 
stems, das die damaligen Hardwaregrenzen 
berücksichtigt, aber auch heute noch seine 
Gültigkeit hat. 

Da inzwischen ein Großteil der kommerziel- 
len Micros mit 16-Bit-Prozessoren arbeitet, liegt 
die Vermutung nahe, daß die Zeit für Acht-Bit- 
Betriebssysteme abgelaufen ist. Doch trotz der 
Vorherrschaft von 16-Bit-Betriebssystemen 
(wie MS-DOS) scheint der Z80-Prozessor un- 
verwüstlich zu sein. 

Kleine Geschäftscomputer und Heimgeräte 
brauchen nur selten die großen Kapazitäten 
der 16-Bit-Prozessoren, wohl aber ein Betriebs- 
system, das die Diskettenlaufwerke steuert. 
Hierfür ist CP/M ideal geeignet, da es lange 
Zeit der Standard für die Acht-Bit-Geräte war 
und über eine immense Softwarebasis verfügt. 
Einige Computerhersteller haben diesen Vor- 
teil erkannt und ihre Produktion umgestellt. 

Trotz der Softwarebasis von etwa 10 000 CP/ 
M-Programmen gibt es Kompatibilitätspro- 
bleme. Bei speziellen Diskettenformaten — wie 
beispielsweise bei der Schneider-Floppy — 
sind zusätzliche Schwierigkeiten zu überwin- 
den. CP/M wurde ursprünglich für 8° und 
5 1/4” Disketten entwickelt, Schneider verwen- 


det jedoch das 3” Format von Hitachi. Es kann 
daher eine Weile dauern, bis genügend CP/ 
M-Pakete auch für diese Laufwerke zur Verfü- 
gung stehen. 

Schneider 664 Computer haben jedoch noch 
ein weiteres Problem: Die Bildschirmsteuerung 
läßt nur 38 KByte für Programme übrig, weit 
weniger, als die meisten neuen CP/M- 
Programme benötigen. Bis die Software auf 
den verfügbaren Speicherplatz zurechtge- 
schnitten ist, können CPC 664-Anwender nur 
mit älteren bzw. gekürzten Programmversionen 
arbeiten, die noch mit weniger RAM auskom- 
men. Doch abgesehen davon scheint CP/M 
immer noch eine Anwenderbasis zu haben. 

Digital Research hat den 16-Bit-Markt nicht 
aufgegeben, auch wenn es heute mehr Kon- 
kurrenten gibt, als zur Zeit, als Gary Kildall die 
erste CP/M-Version entwickelte. CP/M-86 war 
der erste Versuch, in den Markt um den Intel 
8088/86 Chip einzubrechen. Die Anwender 
entschieden sich jedoch für MS-DOS und die 
damit verbundene IBM-Kompatibilität. 

Vor kurzem stellte Digital Research nun Con- 
current CP/M vor — eine Mehrplatzversion von 
CP/M. Dieses Betriebssystem läßt sich als Ein- 
platzsystem einsetzen, unterstützt aber auch 
die Arbeit mehrerer Computer, die in einem 
Netzwerk zusammengeschlossen sind. Es läßt 
sich zwar noch nicht sagen, ob Concurrent 
CP/M den Erfolg seines Acht-Bit-Vorgängers 
erreichen wird, mit Sicherheit ist jedoch damit 
zu rechnen, daß CP/M in der einen oder ande- 
ren Form noch lange im Markt bleiben wird. 


MP/M und CP/NET 


In dieser Serie haben wir uns fast ausschließ- 
lich mit der CP/M Version (22) beschäftigt, 
die am weitesten verbreitet ist. CP/M (22) 
wurde als Einplatzsystem für Einplatzanwen- 
dungen entwickelt. Digital Research bietet je- 
doch auch Systeme für „Multitasking“, die 
sich also für den vernetzten Einsatz von meh- 
reren Maschinen eignen. 

In einem Multitaskingsystem benutzen 
mehrere Anwender oder Peripheriegeräte die 
gleiche Zentraleinheit. Das entsprechende 
Betriebssystem heißt MP/M (Multi-Proces- 
sing Monitor Control Program). Unter MP/M 
können an einen Computer bis zu 16 Termi- 
nals angeschlossen werden, die unabhängig 
voneinander arbeiten. Zur Bewältigung dieser 
Aufgabe erhielt MP/M eine Reihe Befehle, 
die den gleichzeitigen Zugriff auf Dateien 
oder Systemkomponenten (zum Beispiel 
Drucker) steuern. 

CP/NET ist eine weitere Variante von CP/ 
M. Bei dieser Netzwerkversion von CP/M 
können mehrere Anwender mit unterschied- 
lichen Maschinen Daten austauschen. Im Ge- 
gensatz zu MP/M braucht CP/NET kein Ma- 
stersystem mit untergeordneten Terminals, 
doch gibt es eine „Master-Schaltstelle“, die 
das Netzwerk steuert. 
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In den meisten BASIC- 
Versionen sind ver- 
schachtelte IFs mög- 
lich. FORTRAN hat je- 
doch zusätzlich die 
Struktur ELSEIF, mit der 
sich IF-Anweisungen 
über mehrere Pro- 
grammzeilen bis zu 
einer beliebigen Tiefe 
verschachteln lassen. 
ENDIF beendet die 
Struktur. 
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Aus alt mach neu 


Da FORTRAN aus den fünfziger Jahren stammt, fehlen dieser Sprache 
viele Strukturen und Möglichkeiten, die in modernen 
Programmiersprachen als selbstverständlich angesehen werden. Wir 
sehen uns einige Techniken an, die diesen Mangel beheben. 


ORTRAN fehlen zwei wichtige Eigenschaf- 

ten: Es hat keine brauchbaren Steuerstruk- 
turen, die die Sprache leicht verständlich ma- 
chen und verfügt außerdem nur über einge- 
schränkte Möglichkeiten der Zeichenverarbei- 
tung. Im Laufe der Zeit gab es eine Reihe von 
Versuchen, diese Einschränkungen gänzlich 
zu beseitigen. 

Eine Möglichkeit dafür bietet der Einsatz 
eines „Vorprozessors" (eine Art Compiler auf 
einer höheren Ebene). Er bearbeitet Pro- 
gramme, die mit einer erweiterten FORTRAN- 
Version erstellt wurden und setzt für alle Zu- 
satzeigenschaften die entsprechenden Ab- 
läufe des Standard-FORTRAN ein. Damit las- 
sen sich strukturierte Programme schreiben, 
die in kompilierter Form dem Standard ent- 
sprechen und sich allgemein verwenden las- 
sen. WATFOR und RATFOR sind die am weitest 
verbreiteten Versionen. 

Die Eigenschaften von FORTRAN 77 ent- 
sprechen denen der bekannteren Vorprozes- 
soren. Aus diesem Grund blieb die Essenz der 
Sprache erhalten, obwohl viele Compiler für 
Microcomputer auf dem erweiterten FORTRAN 
IV aufbauen und nicht auf FORTRAN 77. 

FORTRAN besitzt keine Blockstruktur wie 
ALGOL, PASCAL oder C, was sich speziell bei 
der Einrichtung von Steuerstrukturen negativ 
bemerkbar macht. Außerdem können nicht 
mehrere Befehle zu einer Anweisung zusam- 
mengefaßt werden (beispielsweise durch BE- 
GIN. .. .END). Blöcke lassen sich nur isolieren, 
wenn sie als separate Subroutinen angelegt 
werden, oder von GOTO-Befehlen umgeben 
sind. Es gibt jedoch eine neue Steuerstruktur, 
die allerdings nicht so recht zu der Sprache 
paßt: IF.. .THEN.. .ELSE... .ENDIF: 


IF (logischer Ausdruck) THEN 


Der logische Ausdruck hat das gleiche Format 
wie Standard-FORTRAN. Normalerweise wird 
der ELSE-Teil weggelassen. 


Eine sehr praktische Form dieser Anwei- 
sung arbeitet mit verschachtelten IFs: 


IF (logischer Ausdruck) THEN 


ENDIF 
Es lassen sich beliebig viele ELSEIFs für tie- 


fere Strukturierung verwenden. 


FALSCH 


FALSCH 


FALSCH 


Die zweite wesentliche Verbesserung ist die 
Einführung eines Datentyps für Zeichen. Zei- 
chenstrings werden — wie die anderen Dekla- 
rationen — am Programmanfang in einem der 
folgenden Formate festgelegt: 


Die maximale Länge eines Strings wird hier 
mit *n angegeben, wobei n eine Ganzzahl ist. 
Dieser Vorgang kann entweder auf das Schlüs- 
selwort CHARACTER angewandt werden 
(wenn alle Strings die gleiche Länge haben), 
oder auf einzelne Strings mit individuellen Be- 
zeichnungen. Die beiden aufgeführten Dekla- 


CODEKNACKER 

C EIN PROGRAMM, DAS GEHEIMNACH- 

C RICHTEN DECODIERT. BEACHTEN SIE DIE 
C _ ANWEISUNG ‚PROGRAM? IN FORTRAN 77 
® 


INTEGER COUNT,PTRIN,PTROUT 
LOGICAL FILE 

CHARACTER *10 NUM, CHAR 
CHARACTER *30 IN, OUT 

DATA COUNT /0/ 


‚DATA ANWEISUNG ZUR INITIALISIERUNG 
EINER VARIABLE 


WENN KEINE GEHEIMDATEI EXISTIERT, 
FEHLERMELDUNG AUSGEBEN 


900900999 


INQUIRE (FILE="GEHEIM',EXIST=FILE) 
IF (.NOT.FILE) THEN 

WRITE (1,10) 

STOP 
ENDIF 


DATEIEN ERÖFFNEN 


@rere) 


OPEN (UNIT=12,FILE="MELDUNG'’,STATUS 
-'NEW') 


DECODIERSCHLÜSSEL ANGEBEN 


ano 


NUM='0123456789' 
CHAR='MW3 0OD$% T' 


C 

C GEHEIME MELDUNG LESEN UND 
C _DECODIEREN 
& 
10 


0 READ (11,20, END=1000)IN 
OUT ' 
PTROUT=1 
DO 2001-1,30 
PTRIN=INDEX (CHAR,‚IN(I:I)) 


STANDARDFUNKTION INDEX’ 
BESTIMMT DIE POSITION 
DES TEILSTRING IN(l:) IM STRING CHAR 
IF (PTRIN.NE.O) THEN 
OUT (PTROUT:PTROUT)J=NUM 
(PTRIN:PTRIN) 
PTROUT=PTROUT+1 
ENDIF 


sie us 


rationen ergeben zwei Strings der Länge 9, 
einen mit Länge 7 und einen mit Länge 16. 
Stringarrays werden wie üblich definiert: 


deklariert ein Array von 50 Strings mit jeweils 
vier Zeichen. Stringkonstanten werden String- 
variablen folgendermaßen zugeordnet: 


Ist der zugeordnete String zu kurz, werden 
Leerzeichen angehängt; ist er zu lang, werden 
die Zeichen am Stringende ignoriert. 

Strings können mit normalen relationalen 


200 CONTINUE 
WRITE (12,20) OUT 


BEACHTEN SIE, DASS EIN- UND AUSGABE 
DAS GLEICHE FORMAT HABEN 


annn 


COUNT=COUNT+1 
GOTO 100 


C 
C _ENDVORGANG 

C MIT 'ENDFILE' WIRD DIE MARKIERUNG 
C DES DATEIENDES GESCHRIEBEN 

C 


1000 ENDFILE (UNIT=12) 
STOP 


c 

C _FORMATS 

10 FORMAT (IH/ES EXISTIERT @7” 
KEINE GEHEIMDATEN) 

20 FORMAT (A) au 

c 

C BEACHTEN SIE, DASS NICHT 

C _ ANGEGEBEN WERDEN MUSS, 

C WIEVIEL ZEICHEN 

C EINZUGEBEN SIND 

c 


END 


a 


Dieses FORTRAN-Pro- 
gramm liest Daten aus 
einer Datei namens GE- 
HEIM und dechiffriert 
über einen Decodier- 
schlüssel den chiffrier- 
ten Text. 
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Da FORTRAN-Compiler 
recht teuer sind, gibt es 
sie normalerweise nur 
für kommerzielle Ma- 
schinen. Das im Bild 
gezeigte Paket läuft auf 
dem Tandy 2000. Durch 
die begrenzten Spei- 
cherkapazitäten sind 
FORTRAN-Anwendun- 
gen auf Micros proble- 
matisch, wenn nicht 
unmöglich. 

Mit der wachsenden 
Verfügbarkeit von 
CP/M auf Heimcompu- 
tern wie dem Commo- 
dore 128, Schneider 
CPC und anderen, ste- 
hen vielen Anwendern 
nun auch FORTRAN- 
Versionen zur Verfü- 
gung. Für Besitzer von 
Schneider Geräten gibt 
es eine besonders 
preiswerte Version, das 
„Nevada FORTRAN“. 
Sie kann bei New Star 
Software Ltd., 45 Plo- 
vers Mead, Wyatts 
Green, Essex, CM15 
OPS bestellt werden. 
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Operatoren wie GT.,LT etc. verglichen werden. 
Es gibt jedoch zwei neue Operatoren nur für 
Stringfunktionen. Der Teilstringoperator liefert 
eine Zeichenfolge des Strings. 


CH1(3:5) 


holt den Teilstring von CHI, der beim dritten 
Zeichen beginnt und beim fünften endet. 
CH1="ABCDEFGHI' 
GCH2=CH1S:5) 


legt in CH2 den Inhalt ‚CDE’, oder genauer 
'CDE ab. Beachten Sie, daß die zweite Zahl 
die Position des letzten Zeichens angibt und 
nicht die Länge des Teilstrings. 

Der Verkettungs-Operator (//) verbindet 
zwei Strings miteinander. 

CHARACTER CH1*4,CH2*4,CH3*8 

CH1='ABCD’ 

CH2='WXYZ' 

CH3=CH1//CH2 


ergibt CH3 mit dem Inhalt ‚ABCDWXYZ'. 

Um FORTRAN richtig nutzen zu können, ist 
ein System mit Diskettenlaufwerken nötig. Die 
meisten FORTRAN-Versionen können sequen- 
tiell und direkt auf Dateien zugreifen. Die 
Quelle oder die Bestimmung eines E/A-Vor- 
gangs wird von der Gerätebezeichnung des 
READ- oder WRITE-Befehls bestimmt. Einige 
Parameterwerte — normalerweise die niedri- 
geren — sind für E/A-Geräte wie Tastatur, Bild- 
schirm und Drucker reserviert, die anderen 
Nummern stehen dem Programmierer zur Ver- 
fügung. Der Befehl OPEN ordnet einer Disket- 
tendatei eine Namen zu: 

OPEN (UNIT=Ganzzahlausdruck, 

FiLE=Dateiname, STATUS=Status) 


Der Ganzzahlenwert für UNIT bezeichnet in 
den folgenden READ- oder WRITE-Befehlen 
die Dateinummer. Status kann mehrere Werte 


annehmen — beispielsweise OLD für eine Ein- 
gabedatei, die es bereits gibt, oder NEW für 
eine Ausgabedatei, die angelegt werden soll. 
Falls die angesprochene Datei vom einfa- 
chen sequentiellen Format abweicht, kann 
OPEN um eine Reihe von Zusatzangaben er- 
gänzt werden: ACCESS= bestimmt den direk- 
ten oder sequentiellen Zugriff; FORM= gibt an, 
ob die Datei formatiert oder unformatiert ist; 
IOSTAT bietet die Möglichkeit, Fehler abzufan- 
gen, falls keine Dateizuordnung zustande 
kommt; RECL= legt die Dateilänge fest. 
CLOSE hat einen ähnlichen Aufbau: 
CLOSE (UNIT=Ganzzahlausdruck, 
STATUS=Status) 


Der Befehl schließt eröffnete Dateien, wird 
aber nur selten benötigt, da bei Beendigung 
des Programms alle Dateien automatisch ge- 
schlossen werden. 

Von den anderen Dateibefehlen ist INQUIRE 
möglicherweise am interessantesten, da sich 
damit der aktuelle Status jeder beliebigen Da- 
tei feststellen läßt. 

Auch zu READ und WRITE sind Zusätze 
möglich, die die E/A-Vorgänge bestimmen. 


READ(7,20,REC=I)A,B,C 


liest beispielsweise Record I einer Datei, die 
für den direkten Zugriff eröffnet wurde. 


READ(7,11,END=1000)A,B,C 


übergibt die Steuerung an Anweisung Num- 
mer 1000, wenn in einer sequentiellen Datei 
das Dateiende gefunden wird. 

Zum Schluß noch ein Blick auf die FOR- 
TRAN-Compiler. Sie arbeiten schnell und ef- 
fektiv und erzeugen schnellen, kompakten 
und leistungsfähigen Code, der besonders bei 
Echtzeitanwendungen große Vorteile bringt. 

Fehler lassen sich mit den FORTRAN-Com- 
pilern jedoch nicht gut abfangen. So akzeptie- 
ren die Compiler Fehler, die beispielsweise 
vor einem PASCAL-Compiler nie bestehen 
könnten. So haben Leerzeichen in einer FOR- 
TRAN-Anweisung etwa keine Bedeutung. Ein 
Compiler nimmt daher oft als erstes alle Leer- 
zeichen aus einer Befehlszeile. Nun legt der 
Befehl 


DO 100 I=1,100 


eine Schleife an, die 100 mal ausgeführt wird. 
Ein Punkt anstelle des Kommas ergibt nach Be- 
seitigung aller Leerzeichen jedoch 


DO1001=1.100 


und damit eine völlig legitime Wertzuweisung 
für die Variable DO100I. Ein Gerücht besagt, 
daß dieser kleine Irrtum im Weltraumpro- 
gramm der Vereinigten Staaten zu einem sehr 
teueren Fehler geführt haben soll. FORTRAN 
war lange Zeit die Standard Programmierspra- 
che der Streitkräfte. Fehler dieser Art waren 
Anlaß für die Entwicklung von ADA. 


er Computer-Unterricht wird sich in Zu- 

kunft stark verändern. Preiswertere Hard- 
ware, verbesserte Software und technologi- 
sche Entwicklungen werden eine Wandlung 
des Unterrichts herbeiführen. Ausbildungs- 
Software wird nicht länger ein unbedeutender 
Zweig des herkömmlichen Unterhaltungs- 
marktes sein, Computer-Lernsoftware wird 
sich zum eigenen, bedeutenden Marktbereich 
entwickeln. Der Grund für diese Wende ist 
nicht einmal überraschend. Zu Beginn der 
Technologie-Revolution übersahen Hard- und 
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Computer Welt 4 
Form der Zukunft 


Umfangreiche Entwicklungen in der Hardware und eine Revolution 
der Datenspeicherungstechniken verändern das herkömmliche 
Klassenzimmer. Wir beenden unsere Serie über „Computer im 
Unterricht“ mit einer Prognose über die Ausbildung in der Zukunft. 


Software-Anbieter den Ausbildungsbereich, 
weil die anderen Sparten zunächst gewinn- 
trächtiger waren. Nachdem Software-Herstel- 
ler den Wert erkannt hatten, ihre Produkte an 
Schulen zu verkaufen, um somit Markenbe- 
wußtsein bei den Schülern, ihren möglichen 
Kunden zu schaffen, änderte sich die Situation. 

Spürbar wurde das zunächst mit Preisredu- 
zierungen bei Hard- und Software. 1985 be- 
gann Apple mit dem gezielten Verkauf des 
Macintosh an Schulen und gab 30 Prozent Ra- 
batt. Atari folgte dem Beispiel mit seiner ST-32- 
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Computer können unser 
Ausbildungssystem völ- 
lig revolutionieren, in- 
dem das Kind durch sie 
in den Mittelpunkt des 
Lernprozesses gestellt 
wird und Zugang zu al- 
len technologischen 
Quellen hat. Satelliten- 
technik und Netzwerke 
erlauben Studenten, mit 
Datenbanken anderer 
Länder und Kulturen in 
aller Welt zu kommuni- 
zieren. Schulen werden 
vielleicht „Lern-Über- 
wachungs“-Zentren 
weichen, in denen Kin- 
der sich treffen, um 
ihre zumeist daheim er- 
ledigten Arbeiten zu 
diskutieren. Interaktive 
Videosysteme können 
Basis für die Entwick- 
lung hochkomplexer 
Software sein. Roboter 
finden Anwendung bei 
der physikalischen Dar- 
stellung abstrakter Pro- 
bleme. Schließlich 
könnten Schüler und 
Studenten Zugang zu 
lokalen Großrechnern 
haben, wobei der Mi- 
crocomputer als intelli- 
gentes Terminal ver- 
wendet wird. Solche Sy- 
steme würden den Da- 
tenfluß, die Kommuni- 
kation zwischen Schü- 
lern überwachen und 
nötigenfalls die Verar- 
beitungsleistung ent- 
sprechend erhöhen. 

Die Anwendungen 
von Micros in Schulen 
zeigen einen deutlichen 
Überhang bei wissen- 
schaftlichen Fächern. 
Die Einführung interak- 
tiver Videosysteme und 
die Entwicklung von 
IV-Software kann das 
Gleichgewicht wieder- 
herstellen. Der Ge- 
schichtsunterricht etwa 
läßt sich durch kom- 
plexe Simulationen ra- 
dikal verändern, die 
aufgrund des enormen 
Datenspeicherungspo- 
tentials der VideoDisc- 
Technologie möglich 
sind. 
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Bit-Computer-Serie und bot dem Anwender 
den Vorteil, statt BASIC ein LOGO in ROM- 
Form zu erhalten. In England wollen Amstrad 
(Schneider), Sinclair und RML in den Schulen 
Fuß fassen. Der Computerhersteller Amstrad 
versucht täglich bis zu 100 Rechner in der Aus- 
bildung unterzubringen. 

Neben kommerziellen Absichten, die hinter 
der Erschließung dieses Marktes stehen, gilt: 
Es gibt eine zweite Generation von Computer- 
anwenderm, die nach ermsthafteren Einsatz- 
möglichkeiten für ihre Rechner suchen. Soft- 
ware-Entwicklungen, die bisher lediglich für 
Schulen gedacht waren, werden nun als „ernst- 
hafte“ Ausbildungs-Software hergestellt und 
sind somit marktgerechter. Mangel an Hard- 
und Software werden also in Zukunft kaum ein 
Hindemis für den Einsatz von Computern in 
der Schule sein. 

Computer im Unterricht können auf zweier- 
lei Art Einsatz finden: Zur Erweiterung und Ver- 
besserung bestehender (Lehr)-Techniken und 
zur Einführung völlig neuer Methoden. Sey- 
mour Papert hat bereits eine Reihe von Mög- 
lichkeiten aufgezeigt, mit denen das LOGO- 
Konzept auch auf dem Macintosh Anwendung 
finden könnte. Papert stellt sich eine „Micro- 
welt der Physik“ vor, die in LOGO geschrieben 
ist und es Kindern ermöglicht, mit den physika- 
lischen Gesetzen zu experimentieren und zu 
spielen. Er prognostiziert ebenfalls eine „Da- 
tenbank Microwelt“, in der Kinder über Infor- 
mations-Verarbeitung unterrichtet werden. Ei- 
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nige dieser Ideen Paperts wurden bereits bei 
Mac’LOGO verwirklicht. 

Die wohl beeindruckendsten Möglichkeiten 
des Computers im Unterricht ranken sich um 
die Einführung völlig neuer Techniken, spe- 
ziell des CD-ROMs und des interaktiven Vi- 
deos (IV). Durch die Möglichkeit, große Daten- 
mengen preiswert zu speichern, ist Ausbil- 
dungs-Software nicht mehr an „Linear"-Pro- 
gramme gebunden, wie sie für kleine, anwen- 
derunfreundliche Systeme bisher entwickelt 
wurden. Die Interaktion bei einem 48 KByte- 
Programm ist extrem begrenzt. Folglich wirkt 
solche Software eher hemmend auf den Lern- 
prozeß. Das interaktive Video bietet dem Pro- 
grammierer größere Flexibilität, das Lernziel 
zu erreichen, und er kann die größere Spei- 
cherkapazität dazu nutzen, das Programm um- 
fangreicher zu gestalten. 

Anläßlich des „Council for Educational Tech- 
nology“ (eines Lernseminars für Ausbildungs- 
techniken) wurden vier Bereiche definiert, in 
den IV an Schulen besonders sinnvoll ange- 
wendet werden kann. Lehrer könnten es als 
Lehrhilfe benutzen, womit Instruktionspro- 
gramme und audiovisuelle Mittel zur Verfü- 
gung ständen. Kleinere Gruppen von Schülern 
könnten IV als „Privatlehrer" einsetzen, den 


Stoff diskutieren und sich Fragen beantworten 
lassen. Einzelpersonen könnten es für Simula- 
tionen einsetzen, ferner für höher entwickelte 
CAL-Programme. Schließlich bietet sich der 
Anwendungsbereich der Datenbank - eine Bi- 
bliothek aus akustischem und visuellem Refe- 
renzmaterial. 


Teddys blaue Augen 


Für die Zusammenstellung und Sammlung des 
Materials ist natürlich noch viel Arbeit erfor- 
derlich. Und doch hat man das System bereits 
in verschiedenen Bereichen eingeführt. Die 
„Volkshochschule“ in England benutzt IV in 
ihren Sommerkursen. Da nur wenig Zeit zur 
Verfügung steht, haben etwa Ingenieurstuden- 
ten Probleme, die Belastung verschiedener 
Materialien zu untersuchen. Es gibt ein IV-Pro- 
gramm, das Fotos, Bewegung und Videose- 
quenzen nutzt. Dabei geht es um einen Ge- 
richtsstreit zwischen dem Hersteller von Ted- 
dybären und seinem Zulieferer für Unterleg- 
scheiben, mit denen die Teddybär-Augen im 
Kopf befestigt werden. Der Student hat eine 
Reihe von Experimenten durchzuführen, die 
als Expertise in der Verhandlung dienen. Das 
interaktive Programm wird von einem CAL- 
Programm gesteuert. Es diskutiert die mög- 
lichen Ursachen dafür, daß die Teddybär-Au- 
gen ständig herausfallen, etwa den Verschleiß 
der Substanz, aus der sie bestehen. Der Stu- 
dent führt verschiedene Experimente durch 
und interpretiert die Ergebnisse, die in einem 
dramatischen Plädoyer präsentiert werden. 

Die Konsequenzen der Übertragung beste- 
hender Software-Techniken — Simulation, CAL, 
Datenbank und dergleichen — auf CD-ROM- 
Systeme sind an sich schon aufregend. Lang- 
fristig wird die neue Technologie sich aber in- 
tensiver auswirken. „Ich glaube nicht", sagt 
Seymour Papert, „daß es in 20 Jahren noch 
Schulen gibt. Im Zeitalter des Computers wird 
sich das Lehrkonzept völlig verändern. Wenn 
man mit offenen Augen durch die Klassenzim- 
mer geht, sieht man, das vieles überflüssig ist, 
was in der Schule stattfindet. Manch anderes 
wichtige geschieht jedoch nicht, etwa, daß Kin- 
der miteinander reden und versuchen, einan- 
der zu verstehen ... Es wird etwas geben müs- 
sen, wo Kinder einander begegnen, lernen, 
sich entwickeln können. Ob wir das Schule 
nennen oder nicht, ist unwichtig. Wichtig ist 
nur zu wissen, daß es Schulen im heutigen 
Sinne nicht mehr geben wird.“ 

Seine Betrachtungen fanden Anklang und 
wurden weitergeführt. So von Professor Tom 
Stonier: „Der Computer wird die Ausbildung, 
den Lernprozeß von der Schule nach Hause 
verlagern. Die Rolle des Lehrers wird sich ver- 
ändern. Von einer wandelnden Datenbank zu 
einem kundigen Berater.“ 

Die möglichen Auswirkungen dieser Verla- 
gerung von system-orientierter Ausbildungs- 


struktur zur Individualausbildung sind gewal- 
tig. Professor Stonier ist Co-Autor des Buches 
„Kinder, Computer und Kommunikation“, in 
dem er eine Ausbildung durch ein „elektroni- 
sches Großmutter"-System vorhersagt. 

Stonier zufolge werden aufgrund der stei- 
genden Lebenserwartung zunehmend ältere 
Menschen die wichtigen Rollen in der Ausbil- 
dung übernehmen, während die Verlagerung 
des Lehrvorganges von der Schule nach Hause 
stattfindet. In vielen sogenannten „primitiven“ 
Gesellschaftsformen ist Ausbildung längst 
Aufgabe der Alten. Stonier glaubt, daß sie 
ideal für eine Teilverantwortung im Ausbil- 
dungsbereich geeignet sind. 

Wenngleich sich ein derartiges Projekt der- 
zeit auf behinderte Kinder beschränkt, gibt es 
doch die Möglichkeit, es auf andere Schüler zu 
übertragen. In England ist es statthaft, sein 
Kind selbst zu unterrichten, wenn man die ört- 
liche Schulbehörde davon überzeugen kann, 
daß man dazu in der Lage ist. Viele Familien 
möchten diese Möglichkeit nutzen, und über 
2000 haben ihre Kinder bereits „ausgeschult“. 
Zugnff zu großen Öffentlichen Datenbanken, 
leistungsfähige Microcomputer mit umfangrei- 
chen CD-ROM-Datenbanken sowie interaktive 
Software werden Eltern optimale Möglichkei- 
ten geben, ihre Kinder daheim zu unterrichten. 

Mit zunehmender Komplexität der Lern-Soft- 
ware wird die Rolle des Lehrers immer schwe- 
rer zu definieren sein. Stonier sagt voraus, daß 
Schüler bald mehr als ihre Lehrer wissen wer- 
den. Solange Lehrer die Funktion „wandelnder 
Datenbänke“ erfüllen, ist das Wissen eines 
Kindes durch die „Kapazität“ des Lehrer be- 
schränkt. Stonier glaubt, daß dieses Muster 
sich mit der Entwicklung von Datenbanken 
und Ausbildungs-Software verändert. Der Leh- 
rer wird so zum Lern-Experten. 


CD-ROM Revolution 


Um Daten zuverlässig speichern zu können, 
ist in CD-ROMs viel Speicherplatz für Fehler- 
prüfroutinen sowie Formatieranweisungen er- 
forderlich. Dennoch bietet eine CD-ROM Disc 
dem Benutzer 552 Megabyte an Speicherplatz, 
womit Tausende von Informationsfeldern zur 
Verfügung stehen. 


Anders als Audio CD-Spieler, für die auf- 


wendige D/A (digital/analog)-Wandler er- 
forderlich sind, arbeiten CD-ROM-Spieler nur 
mit digitalen Daten. Damit werden die Kosten 
für das Gerät beträchtlich reduziert. 

Entsprechende Mengen vorausgesetzt wer- 
den CD-ROM Discs für denselben Preis er- 
hältlich sein, der heute für Audio Compact- 
discs verlangt wird. Da auf einer einzigen 
CD-ROM Disc zahlreiche Programme abge- 
speichert werden können, wird es nach ihrer 
Einführung eine gewaltige Veränderung in 
der Software-Industrie geben. 


Rechneranimierte Film- 
sequenzen und andere 
hochauflösende Bildin- 
formation via Computer 
setzen die Verarbeitung 
und Speicherung großer 
Datenmengen voraus 
und übersteigen die 
Leistungsfähigkeit von 
Microcomputern bisher. 
IV-Technologie macht’s 
möglich. Diese Szenen- 
fotos zeigen ein compu- 
tergesteuertes Videosy- 
stem in Aktion. Hier 
handelt es sich um ein 
Ausbildungsprogramm 
für Ingenieurstudenten. 
Das Programm „spielt“ 
in einer fachbezogenen 
Gerichtsverhandlung, 
in der der Student die 
Rolle des Experten 
übernimmt, Experi- 
mente ausführt und vor 
Gericht aussagt. 
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Sind vier Punkte gege- 
ben, die der Robotarm 
mit einer Bewegung 
bestreichen soll, dann 
führt er, geleitet durch 
unser Programm, nicht 
den Weg der gestrichel- 
ten Linie aus. Vielmehr 
folgt er der kubischen 
Bewegungskurve, die 
einen fließenderen Be- 
wegungsablauf gewähr- 
leistet. 


Kurvenberechnung 


Dies ist der letzte Kursabschnitt, der sich mit dem Robot-Arm befaßt. 
Wir stellen die Technik vor, die die Bewegungen des Arms weicher 
und eleganter macht. Dabei hilft die mathematische Methode der 


„Kubischen Interpolation“. 


er Programmteil „moveservo“, den wir als 

Modul der Steuersoftware des Armes ein- 
geführt haben, vermindert sprunghafte Bewe- 
gungen beim Wandern von einer Position zur 
nächsten. Die Motoren bekommen dabei ihre 
Winkelinformation aus mehreren auf „ANGLE“ 
folgenden Speicherplätzen. 

Um den Bewegungsablauf gleichmäßig zu 
machen, werden die Positionsangaben beim 
Änsteuern einer neuen Stellung nicht mehr di- 
rekt zu den mit den Motoren gekoppelten Spei- 
cherstellen gePOKEt, sondern in „NEWPOS"- 
Speicherstellen abgelegt. Der Aufruf von „mo- 
veservo" erhöht bzw. emiedrigt die „ANGLE"- 
Werte nach einem Vergleich mit „NEWPOS“ so 
lange um je eine Einheit, bis „ANGLE“ mit 


Kubische Bewegungskurve 


Kürzeste Verbindung zwischen Punkten 
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„NEWPOS" übereinstimmt. 

Das Einlesen in NEWPOS anstelle von AN- 
GLE schützt die Motoren vor abrupten Positions- 
wechseln — der Robot-Arm gewinnt an Be- 
triebssicherheit und Genauigkeit. Über die Ta- 
statur wird der Arm langsam durch die Zwi- 
schenpositionen auf die Endstellung gebracht. 
Die wichtigsten Punkte des Bewegungsablaufs 
speichert ein Array. Durch Einbau eines Verzö- 
gerungsfaktors in „moveservo“ läßt sich der Be- 
wegungsablauf mit unterschiedlichen Ge- 
schwindigkeiten wiederholen. 

Es sind aber noch weitere Verbesserungen 
möglich: In erster Näherung sind alle Bewegun- 
gen den Veränderungen in NEWPOS proportio- 
nal. Sie hängen auch noch davon ab, wie lang 
der Hebel zwischen Armgelenk und Antriebs- 
element ist. Auch der Radius der Antriebschei- 
ben an den Motoren selbst spielt eine Rolle. 
„moveservo" bewegt jedes Glied des Arms 
gleichmäßig und mit konstanter Winkelge- 
schwindigkeit (Grad pro Sekunde) in die neue 
Position. Am Ziel kann es aber vorkommen, daß 
der Arm ganz plötzlich seine Bewegungsrich- 
tung verändern muß, um die nächstfolgende 
Position anzusteuern. 


Natürliche Bewegung 


Dieses Problem ist weniger schwerwiegend als 
die abrupten Positionswechsel. Durch Spei- 
chern einer größeren Zahl von Zwischenpositio- 
nen lassen sich die plötzlichen Änderungen der 
Richtung nach dem Erreichen einer Position 
vermeiden. 

Die Bewegungen des Arms können durch 
den Einsatz verbesserter Software immer „na- 
türlicher“ werden — allerdings in den Grenzen, 
die vom verfügbaren Speicherplatz gesetzt 
werden. Beim Transport der Garnrolle durch nur 
vier Einzelpositionen — Ergreifen des Röll- 
chens, Hochheben, Position über der Tasse ein- 
nehmen, Garnrolle wieder herunterlassen — 
brauchen wir nur wenig Speicherplatz, die Un- 
regelmäßigkeiten der Bewegung sind aller- 
dings erheblich. 

Um sie zu vermindern, könnten wir etwa 60 
Zwischenpositionen festlegen. Dadurch würde 
die Bewegung flüssig und elegant. Allerdings 
wäre dafür sehr viel Speicher nötig, und die zeit- 
raubende Eingabe der Werte über die Tastatur 
ist ein weiteres Hindemis. 


Als Alternative können wir aber eine Reihe Commodore 64 
von Zwischenpositionen berechnen lassen und 

s “ d 1 5 b W: en 18 REM xxx 
sie mit den manuell eingegebenen Werten 28 REM ** CBM CUBIC SPLINES xx 
kombinieren. 30 REM xxx 

& & 46 : 

Wenn wir uns vier festgelegte Punkte vorstel- 58 V=7:FOR I=1 TO 25:DW$=DW$+CHR$C17) :NEXT 

len, läßt sich ein elastischer Stahldraht stets so 68 DIM X(V+3) ,Y(V+3) „M(V+3) „26V+3) 


78 X(2)=8:X(3)=5:X(4)=28:X(5)=25 


biegen, daß er zumindest durch drei dieser 88 Ye2I=2ıYCDmi2ıYCdelzıyge2 
Punkte hindurchgeht. Die mathematische Ent- 98 REM ** LINEARLY EXTEND THE ENDS ** 
sprechung zum Biegen eines Federstahls um a ar 
festgelegte Punkte herum ist die kubische In- 128 X(6)=X(5)+(X(5)-X(4)) 
terpolation (kubisch, weil die mathematische iS ER OR 
Funktion Werte in der dritten Potenz enthält). 1598 YCFI=YCE)+lYCE)-YC5)) 
Das abgedruckte Programm zeigt, wie zu- = een 5 ; 
sätzliche Punkte ermittelt werden können. 188 PRINT" INCORPORATES \ en 


178 PRINT" JOINING KNOTS" 
288 GOSUB 3888:REM DRAW KNOTS 


Kubische Interpolation ee ea 


248 FOR X=X(2) TO X(5) 


Acorn B 258 GOSUB2884:REM AKIMA FUNCTION 

1888 REM KRRRcKKEREEEEE EEE 255 IF X=X(J) THEN J=J+1:60T0278:REM DON’T DRAW 
1818 REM ** BBC CUBIC SPLINES ** 268 N=X :M=Y:GOSUBS898 :PRINT CHR$(46) 

10828 REM 278 NEXT 

1038: 2808 GET A$:IF A$="" THEN 288 

1848 MODE ®& 298 END 

1058 VDU 23,240,24,126,66,219,219,66,126,24 1098 REM x**** SET AKIMA xxx** 

1968 V=7 16818 REM CALC AKIMA COEFS 

10878 DIM X(V+3) ,Y(V+3) ‚M(V+3) ,2(V+3) 1828 FOR I=1 TO V-1 

1080 XC2)=8 :X(3)=10 :X(4)=48 :X(5)=58 1838 MCI+23=(YCI+1)-YCIII/CXCI+LI-XCI)) 

10898 Y(2)=2 :Y(3)=12 :Y(4)=12 :Y(5)=2 1840 NEXT I 

1188 REM linearly extend the ends 1858 M(V+2)=2#M(V+1)-M(V) 

1118 XC1)=XC2)-(X(3)-X(2)) 1868 M(V+3)=2%M(V+2)-M(V+1) 

1128 YCi)=YC2)-(Y(3)-Y(2)) 1878 M(2)=2xM(3)-M(4) 

1138 XCEI=X(l5H+lXCH-X(4)) 1888 MC1)=2%M(2)-M(3) 

1148 XC7)=XL6)+(X(l6)-X(5)) 1898 FOR I=1 TO V 

11598 YCS)=Y(C5)+lYl5)-Y(4)) 1188 A=ABS(M(1+3)-M(1+2)) 

11658 YC7I=YLB)+lYlEI-Y(5)) 1118 B=ABS(CM(CI+1)-MC1)) 

1178 CLG:VDU 5:MOVE 198,788 1128 IF A+B<>a THEN ZCI)=(AxMCI+1)+B*MCI+2))/CA+B) 
1188 PRINT"Demonstration of a routine" 1138 IF A+B=8 THEN ZCI)=(CMCI+2)+M(I+1))/2 
1198 PRINT"which incorporates a cubic spline" 1148 NEXT I 

1288 PRINT" joining Knots" 1158 RETURN 

1218 FOR I=2 TO 5 26868 REM **** AKIMA FUNCTION ***%* 

1228 MOVE X(1)*29-4,YC1)x*20+15:PRINT CHR$(248); 2818 N=1 

1238 NEXT 20828 IF X<X(1) OR X>X(V-2) THEN RETURN:REM CHECK RANGE 
1248 GOSUB 1588:REM SET AKIMA 20838 I=8 

1258 FOR X=X(2) TO X(5) 2848 I=I+1:IF X>=X(1I) THEN 2848 

1268 GOSUB 1338:REM AKIMA FUNCTION 20856 I=I-1i 

1278 IF X=X(2) THEN MOVE X*28,Yx*28 2868 REM BEGIN INTERPOLATION 

1288 IF X<>X(2) THEN DRAU X*28,Yx*28 28708 B=X(I+1)-X(I) 

1298 NEXT 2088 A=X-X(I) 

1388 END 2898 Y=YCId+ZCI)#A+rl3%MCI+2)-2*2C1I)-2ZCI+ri)) #A*A/B 
1318 : 2108 Y=Y+(ZCId+ZCI+1)-2%M(1I+2)) #AXARA/CB*B) 
1328 : 2118 RETURN 

1338 REM **** AKIMA FUNCTION #*%*%* 30868 REM **** PRINT KNÜTS **** 

1348 REM AKIMA RUCKDESCHEL BOOK 2 BYTE/ MCGRAW-HILL> 3818 FOR I=2 TO 5 

1358 N=1 36828 N=X(1) :M=Y(1):60SUB 5888:PRINT CHR$(215) 
1368 REM CHECK TO SEE IF X IS IN THE TABLE RANGE 3830 NEXT I 

1378 IF xX<X(1) OR X>X(CV-2) THEN RETURN 3846 RETURN 

1388 REM FIND RELEVANT TABLE INTERVAL 5888 REM **** POSITION AT N,M *##*** 

1398 I=8 5818 PRINT CHR$(19; 

1488 I=I+1:IF X>=XCI) THEN 1488 5828 PRINT TAB{N? ;LEFT#(CDW$ ,25-M) ; 

1418 I=I-1 5838 RETURN 


1428 REM BEGIN INTERPOLATION 

1438 B=X(I+1)-X(I) 

1448 A=X-X(I) 

1458 Y=YCII+ZCI)*Arl3%#MC1I+2)-2%*2C1I)-2ZCI+1))#AxA/B 
1468 Y=Y+(ZCI)+ZC1I+1)-2%MCI+2)) AXAXxA/(CB*B) 

1478 RETURN 

1486 : 

1498 : 

15808 REM ***%* SET AKIMA x**%*%* 

1518 REM CALCUALATE AKIMA COEFS 
1528 FOR I=1 TO V-1 

1536 REM SHIFT I TO I+2 

1548 MCI+2I=CYCI+ LI -YCIII/CXCT+ I -X 
1558 NEXT I 

1568 M(V+2)=2#M(V+1)-M(V) 

1578 M(V+3)=2#M(V+2)-M(V+1) 

1586 M(2)=2xM(3)-M(4) 

1578 M(1)=2%*M(2)-M(3) 

1588 FOR I=i TO V 

1618 A=ABS(M(I+3)-M(1+2)) 

1628 B=ABS(M(CI+1)-MCID) 

1638 IF A+B<>8 THEN ZCI)=(AxMCI+1)+BRMCI+2))/CA+B) 
1648 IF A+B=8 THEN ZCI)=(CMC1+2)+MCI+1))/2 

1658 NEXT I 

1668 RETURN 
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Wir unterbrechen 
dieses Programm... 


Interrupts geben Betriebssystemen die Möglichkeit, 
Prozessorkapazitäten des Computers optimal einzusetzen. In dieser 
Folge über das OS des Acorn B untersuchen wir die Funktionsweise 


von Interrupts und Ereignissen. 


E: BASIC-Programm, das auf dem Acorn B 
abläuft, vermittelt leicht den Eindruck, daß 
die gesamte Maschine sich der Programmaus- 
führung widmet. Das ist jedoch nicht der Fall, 
das Betriebssystem führt auch ständig andere 
Funktionen aus, etwa die Abfrage der Tastatur. 
Diese Aufteilung der Computerkapazität wird 
durch Interrupts (Unterbrechungen) möglich. 
Interrupts sind im wesentlichen Signale, die die 
CPU veranlassen, ihre augenblicklichen Aktivi- 
täten anzuhalten und andere Aufgaben auszu- 
führen. Sobald die CPU diese zweite Aufgabe 
beendet hat, kehrt sie zum ursprünglichen Ab- 
lauf zurück und setzt ihn fort. Im AcomB steuern 
Interrupts eine ganze Reihe von Aktivitäten: Ta- 
staturabfragen, die Darstellung der Farben, den 
Ablauf des Befehls ENVELOPE, den Konvertier- 
vorgang des A/D-Wandlers etc. Sehen wir uns 
diesen Mechanismus einmal an. 

Die Interrupts des Acorn B können von meh- 
reren Hardwarekomponenten erzeugt werden, 
darunter der serielle Schnittstellenchip, die 
VIAs (Versatile Interface Adaptors — Schnitt- 
stellenadaptoren) für Anwender und System so- 
wie die Schnittstellenhardware für Econet und 
Diskettenlaufwerk. Diese Bauelemente geben 
zwei verschiedene Interrupttypen an den 6502- 
Prozessor weiter. Beide unterbrechen den au- 
genblicklichen Ablauf, doch kann ein Inter- 
rupttyp von der CPU ignoriert werden. Unter- 
brechungen dieser Art werden „maskierbare 
Interruptanforderungen"“ („Maskable Interrupt 
Requests“ — IRQs) genannt. Der andere Inter- 
rupttyp heißt „nicht-maskierbarer Interrupt“ 
(„Non-Maskable Interrupt“) oder kurz NMI. Er 
hat eine hohe Priorität und kann von der CPU 
nicht ignoriert werden. 

Die NMIs des Acorn B sind für Systemkompo- 
nenten reserviert, die die unmittelbare Auf- 
merksamkeit der CPU verlangen, wogegen Ge- 
räte, die IRQs ausgeben, ruhig etwas warten 
können. Auf dem Acorn B lösen nur die Econet- 
Hardware und das Diskettensystem NMlIs aus. 
Da das OS bei Erhalt eines NMI eine Maschi- 
nencoderoutine auf Seite &OD anspricht, sollten 
Sie nach Installation einer Diskettenschnitt- 
stelle nichts mehr auf diese Seite schreiben. 
Wir werden nicht näher auf NMlIs eingehen, da 
der Acorn B sie nur hierfür verwendet. 


Wenden wir uns nun den IRQs zu. Auf dem 
6502 werden maskierbare Interrupts mit dem 
Maschinencodebefehl SEI abgeschaltet und 
mit CLI wieder aktiviert. Wenn der 6502 ein In- 
terrupt erhält, fragt er zunächst alle Interrupt- 
quellen ab, ob die Unterbrechung dort ausge- 
löst wurde. Nach der Identifizierung der Quelle 
arbeitet der Prozessor die dafür vorgesehene 
Interruptroutine ab und informiert die Quelle, 
daß sie die Interruptanforderung nun „verges- 
sen“ kann („Clearing the _Interrupt"). 
Maschinencoderoutinen zur Bearbeitung von In- 
terrupts heißen „Interrupt Service Routinen“ 
oder kurz ISR. 


ISR sichert die Werte 


Da das unterbrochene Programm nach Behand- 
lung des Interrupts mit den gleichen Registerin- 
halten weiterarbeiten soll, sichert die ISR als er- 
stes diese Werte und schiebt sie auf den Stapel. 
Nach Behandlung des Interrupts werden sie 
wieder in ihre Register zurückgeladen. Inzwi- 
schen führt die ISR die entsprechende Interrupt- 
routine aus und löscht vor dem Rücksprung in 
das unterbrochene Programm noch die Inter- 
ruptbedingung. Der Löschvorgang ist notwen- 
dig, da der 6502 sonst unmittelbar nach dem 
Rücksprung wieder den gleichen IRQ erhalten 
würde: Ohne Löschung entsteht eine Endlos- 
schleife. 

Sehen wir uns diesen allgemeinen Ablauf 
einmal im konkreten Fall an. Der Acorn setzt In- 
terrupts für viele Vorgänge ein. Aus diesem 
Grund dürfen Interrupts auch nicht allzu lange 
mit SEI abgeschaltet werden. Ein paar Millise- 
kunden bringen noch keine Probleme, doch bei 
längeren Zeiten arbeitet das OS nicht mehr kor- 
rekt. Das folgende Programm zeigt, was ge- 
schieht, wenn Interrupts für längere Zeit abge- 
schaltet werden: 

10 MODE 2 

20 DIM C(100):REM Platz für Maschinen- 
code reservieren 

30 FOR I%=0 TO 2 STEP 2 

40 P%=C 

50 [OPT I% 

60 .code SEI 

70 RTS 


80 ]:NEXT 

90 COLOUR 14 

00 PRINT "Hallo!" 

110 ENVELOPE 1,1,4,—4,3,10,20,20,127,0, 
D,—5,126,126 

120 SOUND 1,1,160,200 

130 TIME=O 

140 REPEAT 

150 PRINT TIME,I% 

160 I%=1%+1 

170 IF TIME>100 THEN CALL code 

180 UNTIL FALSE:REM Endlosschleife 

Beim Ablauf dieses Programms werden Sie be- 
merken, daß sich schon kurz nach Aufruf der 
Maschinenroutine „code“ die Variable TIME 
nicht mehr verändert, die Farben aufhören zu 
blinken und die Bearbeitung von ENVELOPE 
nicht weitergeht. Die Routine gibt aber immer 
noch dasrichtige I% aus und zeigt damit, daß die 
Maschine nicht abgestürzt ist. Nach Beendi- 
gung des Programms sollten Sie aber in jedem 
Fall OTRL BREAK drücken. 

Sobald der 6502 ein IRQ erhält, übergibt er 
die Steuerung an eine ISR, deren Adresse sich 
im Vektor IRQV1 befindet. IRQV1 liegt bei &204 
und &205. Die über diesen Vektor angespro- 
chene Routine prüft zunächst, ob Hardwarein- 
terrupts vorliegen, die das OS routinemäßig be- 
nötigt. Die ISR dieses Vektors bearbeitet die In- 
terruptanforderungen dreier Hardwarekompo- 
nenten in dieser Reihenfolge: die des seriellen 
Schnittstellenchips, der System-VIA und einem 
Teil der Anwender-VIA. 


Der serielle Schnittstellenchip ist ein Teil der 
Hardware und für die Schnittstelle RS423 und 
das Cassetteninterface zuständig. Interrupts 
dieser Quellen betreffen natürlich auch diese 
Systemteile. Der Chip hat bei diesem Vektor 
höchste Priorität. 

Die Interrupts der System-VIA stehen an 
zweiter Stelle der „Hackordnung“. Die außer- 
ordentlich flexible VIA verbindet die CPU mit 
einer Reihe anderer Systemteile und bietet au- 
ßerdem Möglichkeiten der Zeitbestimmung. Je- 
der Tastendruck erzeugt ein Interrupt der Sy- 
stem-VIA und informiert damit das OS, daß eine 
Eingabe bearbeitet werden muß. Weiterhin ver- 
anlaßt der Chip eine Unterbrechung, wenn ein 
voller Bildschirminhalt zum Monitor gesandt 
werden soll. Dieser Interrupt heißt „Vertical 
Sync Interrupt“ und wird jede Fünfzigstelse- 
kunde ausgelöst. 

Auch der A/D-Wandler steht mit der System- 
VIA in Verbindung. Nach jeder Signalumwand- 
lung löst er ein Interrupt aus und veranlaßt da- 
mit das OS, die Werte zu aktualisieren, die für 
die Rückgabe einer Zahl an die Funktion AD- 
VAL nötig sind. Ein weiterer wichtiger Interrupt 
der System-VIAs findet jede Hundertstelse- 
kunde statt. Er inkrementiert TIME, aktualisiert 
den „Interval Timer“ (der für die Erzeugung von 
„Ereignissen“ eingesetzt wird), dekrementiert 
den INKEY-Zeitzähler (der die Verzögerung 
eines INKEY-Befehls mißt) und bearbeitet 
einen Teil von ENVELOPE. Der Interrupt veran- 
laßt das OS weiterhin, alle inzwischen betätig- 


Ad 


Vergleichen Sie einmal 
die CPU des Acorn B 
mit dem Kellner eines 
gutbesuchten Restau- 
rants. Wie der Kellner 
zunächst die wichtigen 
Gäste (die Priorität vor 
anderen verlangen) be- 
dient, dann Tische ab- 
räumt und gelegentlich 
auftretende Schwierig- 
keiten beseitigt, so muß 
auch der 6502 seine 
Aufmerksamkeit auf 
die „Bedienung“ der 
Peripherie, die Steu- 
erung von Datenüber- 
tragung und die Pro- 
grammausführung auf- 
teilen. 

Ein geschickter Kell- 
ner richtet seine Auf- 
merksamkeit auf jede 
dieser Aktivitäten, ver- 
gißt dabei aber nicht, 
seine hungrigen Gäste 
mit Speisen zu versor- 
gen. Der 6502 arbeitet 
auf ähnliche Weise. Er 
antwortet auf Unterbre- 
chungen („Interrupts“) 
oder Ereignisse 
(„Events“), die entwe- 
der von der Hardware 
oder per Software aus- 
gelöst werden. Nach 
der Behandlung eines 
Interrupts setzt der Pro- 
zessor seine unterbro- 
chene Arbeit fort. 
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ten Tasten zu bearbeiten. Andere Interrupts der 
System-VIA betreffen das Sprachsynthesesy- 
stem und (falls vorhanden) den Lichtgriffel. 
Zwar gibt es OSBYTE-Routinen, mit denen Sie 
die Reaktion des OS auf Interrupts dieser bei- 
den Quellen ändern können, doch werden Sie 
gleich sehen, welche schwerwiegende Folgen 
Veränderungen von IRQV1 haben können. 

Die Interrupts mit der niedrigsten Priorität 
kommen von der Anwender-VIA, also der Sy- 
stemkomponente, die die Kommunikation mit 
dem User Port und dem Druckerinterface selb- 
ständig steuert. 

Jedes Interrupt, das von diesem Vektor nicht 
bearbeitet werden kann, wird an eine ISR von 
Vektor IRQV2 weitergegeben. Die meisten In- 
terrupts, die diesen Vektor ansprechen, kom- 
men von der Anwender-VIA, die sich mit einer 
Reihe von Interrupts an die CPU programmie- 
ren läßt. Diese Unterbrechungen würden je- 
doch von der CPU im Normalfall nicht erkannt 
und ausgeführt werden. 


„Intercepting“ 


IRQV2 liegt bei den Adressen &206 und &207 
und läßt sich ändern, um auf die ISR des Anwen- 
ders zu zeigen. Obwohl auch IRQOVI1 geändert 
werden kann, sollten Sie für Ihre ISR nur IRQV2 
einsetzen. Die Umstellung eines Vektors auf 
eine andere Routine heißt „Intercepting“ (ab- 
fangen) eines Vektors. Um den IRQV2-Vektor 
abfangen zu können, müssen beim Einsprung 
in eine selbsterstellte Routine folgende Bedin- 
gungen erfüllt sein: 
e Die CPU muß den Inhalt des A-Registers be- 
reits in &FC gespeichert und das Prozessor Sta- 
tus Register (PSR) auf den Stapel geschoben 
haben. 
e Die Register X und Y sollen in dem Zustand 
sein, in dem sie sich vor Auftreten des Inter- 
rupts befanden. 

Punkt zwei besagt, daß Sie die X- und Y-Regi- 
ster beim Eintritt in Ihre ISR mit folgenden Be- 
fehlen sichern müssen: 


TXA:PHA 
TYA:PHA 


Danach sollte Ihre Routine die Interruptbedin- 
gung löschen. Dieser Vorgang hängtjedoch von 
der Quelle der Unterbrechung ab. Bei der An- 
wender-VIA müssen dafür gewöhnlich be- 
stimmte Register der VIA gelesen oder ge- 
schrieben werden. Denken Sie auch daran, vor 
der Rückkehr in das unterbrochene Programm 
die Register wieder in ihren ursprünglichen Zu- 
stand zu versetzen und die ISR mit dem Befehl 
RTI zu verlassen. Noch ein letzter Hinweis: Ob- 
wohl das A-Register beim Sprung auf IRQVlin 
&FC gespeichert wurde, kann ein weiterer In- 
terrupt durchaus veranlaßt haben, daß dieser 
Wert vor Beendigung Ihres eigenen Interrupts 
überschrieben wurde. 


Interrupts des VIA-Chips 


Flag-Register der Interrupts 


23 
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INNERE, 


Obwohl der 6502-Prozessor des Acorn B nur 
zwei Interruptleitungen — IRQ und NMI — be- 
sitzt, läßt sich der Schnittstellenchip zur Peri- 
pherie-VIA so programmieren, daß sich meh- 
rere Systemkomponenten die gleiche IRQ-In- 
terruptleitung des Prozessors teilen können. 
Jeder VIA-Chip hat zwei E/A-Ausgänge im 
Acht-Bit-Format, von denen jeder wiederum 
über acht Datenleitungen und je ein Paar Sig- 
nalleitungen verfügt. Die Leitungen von Aus- 
gang A heißen CAl und CA2 und die von 
Ausgang B CBl und CB2 Sie werden oft für 
das „Handshaking“ (die Synchronisation der 
Datenübertragung zwischen Micro und einem 
Peripheriegerät) eingesetzt. Die Leitungen 
können aber auch als Interruptleitungen pro- 
grammiert werden. Zusätzlich zu den vier 
möglichen Interruptleitungen jeder VIA gibt 
es ein internes Interrupt, das sich über das 
Shift-Register des Chips generieren läßt. Die- 
ses Register steuert die serielle Datenüber- 
tragung, die von externen, über CBl herein- 
kommenden Impulsen ausgelöst wird und 
über CB2 abläuft. Schließlich gibt es noch 
zwei Intervalltimer, die ebenfalls Interrupts 
erzeugen können. All diese Interruptquellen 
sind mit der einzigen IRQ-Leitung des Pro- 
zessors verbunden. 

Zur Bearbeitung eines Interrupts muß der 
Prozessor die Quelle kennen. Die CPU fragt 
dazu in der VIA das Flag-Register für Inter- 
rupts ab. Jedes Bit dieses Registers ent- 
spricht einer der potentiellen Interruptquellen 
und wird auch von der Interruptanforderung 
dieser Systemkomponente gesetzt. Eine Aus- 
nahme ist Bit 7, das nur gesetzt wird, wenn 
ein Peripheriegerät ein Interrupt anfordert. 

In manchen Situationen muß verhindert 
werden, daß Interrupts ausgegeben werden, 
während der Prozessor gerade einen anderen 
Interrupt bearbeitet. Diese Information kann 
in das Register zur Freigabe von Interrupts 
(„Interrupt Enable Register“ — IER) program- 
miert werden. 


Fachwörter von A bis Z 


Macro = Makrobefehl 

Ein Makrobefehl oder kurz Makro ist 
ein einzelner Befehl innerhalb eines 
Programms, der für eine ganze An- 
weisungsfolge steht. Sie wird an an- 
derer Stelle definiert und ausgeführt, 
wenn das Programm auf den „Na- 
men“ des Makros trifft. Makros wer- 
den vor allem bei der Assembler- 
programmierung verwendet. 

Ein „Makro-Assembler“ erlaubt 
die Definition eines Makro, für die 
dann im Assemblerprogramm nur 
ein einziger Befehl erforderlich ist. 
Insofern sind Makros mit den Proze- 
duren beim strukturierten BASIC 
oder bei LOGO verwandt. Die Proze- 
dur wird jedoch als Unterprogramm 
ausgeführt, während ein Makro bei 
der Assemblierung jedesmal durch 
die Folge der zuvor definierten An- 
weisungen ersetzt wird. Wie ein Pro- 
zedurname kann auch ein Makro- 
name, wenn er einmal vereinbart ist, 
im Programm beliebig oft Verwen- 
dung finden. 


Magnetic Card = Magnetkarte 
Magnetkarten wurden Ende der 
sechziger Jahre als Speichermedium 
für die Daten- und Textverarbeitung 
verwendet, insbesondere bei IBM in 
Verbindung mit den „Selectric“- 
Schreibmaschinen. Die Karten aus 
Kunststoff oder starkem Papier hat- 
ten etwa das Format einer Lochkarte 
und waren ähnlich wie Disketten 
und Bänder mit einem ferromagneti- 
schen Material beschichtet. Die ge- 
speicherte Information konnte durch 
einen speziellen Kartenleser wieder 
entziffert und mit der Schreibma- 
schine ausgedruckt werden. 

Heute sind Magnetkarten vorwie- 
gend als Scheck- und Kreditkarten 
in Gebrauch. Ein Magnetbandstrei- 
fen auf der Kartenrückseite enthält in 
codierter Form den Namen des Inha- 
bers und seine Bankverbindung mit 
Kontonummer. Anhand dieser Daten 
können Bankgeschäfte über Automa- 
ten abgewickelt werden. Kleine Kar- 
tenleser gibt es auch für Einzelhänd- 
ler, um Kreditkarten rechnergestützt 
mit der Liste gestohlener oder ver- 
lorgengegangener Karten zu ver- 
gleichen und um Zahlungsleistungen 


Hier werden einzelne Fach- 
ausdrücke eingehend behandelt. 
Da bei der Kommunikation mit 
dem Computer meist die 
englische Sprache verwendet 
wird, werden hier zunächst die 
englischen Begriffe genannt, 
dann die deutsche Übersetzung. 
In den Gesamtindex werden 
sowohl deutsche als auch 
englische Stichwörter aufge- 
nommen, damit Sie es leichter 
haben, das von Ihnen 
Gesuchte zu finden. 


Material überzogen ist. Bei der flexi- 
blen Diskette oder ‚Flopy Disk’ ist 
die Platte selbst aus elastischem 
Kunststoff, bei der starren Magnet- 
platte oder ‚Hard Disk’ im allgemei- 
nen aus einer Aluminiumlegierung. 
Für die Beschichtung wird bei Dis- 
ketten meist Eisenoxid verwendet, 
bei Starrplatten oft auch ein Kobalt- 
Nickel- oder ein Kobalt-Chrom-F'ilm. 
Der Scheibendurchmesser variiert 
von 7,6cm bei der 3-Zoll-Diskette bis 
zu 91,4 cm bei Festplatten für Groß- 
rechner. 


Verbreitet ist die Verwendung von Magnetkarten bei Bargeldautomaten. Der 
Magnetstreifen auf der Karte enthält eine Codenummer, die elektronisch ge- 
lesen und mit den Ziffern verglichen wird, die der Benutzer eintastet. Stim- 
men die Zahlen überein, wird der Zugang zur Geldausgabe freigegeben. 


sofort über ein Telefonmodem durch 
einen Zentralcomputer der Bank be- 
stätigen zu lassen. 


Magnetic Disk = 

Magnetplatte, Diskette 
Magnetplatte und Diskette sind Da- 
tenträger in Gestalt einer rotieren- 
den Scheibe (Disk), deren Oberflä- 
che mit einer dünnen Aufzeich- 
nungsschicht aus magnetisierbarem 


Bildnachweise 


1765: Darrell Huff 

1718, 1769: Caroline Clayton 
1774, 1775, 1786: Ian McKinnell 
1777-1719: Crispin Thomas 
1783: Mike Clowes 


1784: MS-Fortran, Computer World 

1785: Alan Adler 

1787: BBC Open University Production 
Centre 

1788, 1789, 1791: Kevin Jones 

1792: Liz Dixon 
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Re: The non-deliverf 
o 


Dear Sir,e i Drop. spacing 
Imaa nornal width v 
Double width 


Der Texter 

Hält das preisgünstige Textverarbeitungs- 
system Joyce von Schneider, was sein Name 
verspricht? Zum Lieferumfang gehören immer- 
hin Diskettenlaufwerk, Drucker und Software. 


Höret und staunet! 

Den Computer als Musikinstrument einzu- 
setzen ist für Profis und Amateure gleicher- 
maßen interessant. 


COBOL für Micros 
Selten auf Micros eingesetzt. Wir zeigen 
die vier Hauptabschnitte von COBOL. 


Zeit für Go 

Das orientalische Brettspiel Go hat 
das Interesse der KI-Wissenschaftler 
geweckt. Wir erklären die Regeln und 
beginnen mit der Programmierung 


des Spiels. 


